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The Mofittilv Jourr^aE for Commodore 



• Pie Graph 

• Telecommander 

• Arithmetic at^ 
Nursery Schoc 

• The Basics of Basic 

• VIC-20— Assembly 
Language Programming 
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Tired of chasing your tail? 

If youre looking for Commodore 64orVlC-20 
software, look no further than Synapse! 




Drelbs for the Commodore 64 \ and Astro 
Patrol, Squeeze and Harrier for the VIO20 
Cartridge versions available soon. 

Other titles available for the Atari 400 800 
computers. 
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Your dealer out of stock? Order 
direct — send your check or 
money order including $2 for 
shipping and handling. Or join 
the Synapse Elite! Write for free 
membership! 




*E PHARAOHS CURSE 
-Ttune — yours for the tak- 
But can you avoid the 
it of Rama and the evil 
imy? Are you nimble 
jgh to leap the chasms 
avoid the booby traps 
ding between you and 
lorn? 



RVIVOR 
The first multi-player coop- 
erative space adventure. 
Alone or with your hand- 
picked crew (1 to 4 players) 
you must out-maneuver the 
Xenogryph fleet and destroy 
their space fortresses. Can 
you train yourself and/or your 
crew to survive? 



SHAMUS 

The odor tells you the Shad- 
ow's there — in one of four 
levels of 32 rooms, each bris- 
tling with danger You know 
it won't be a high school 
prom, but there's no turning 
back. Shamus — the sleuth 
adventure classic. 



FT. APOCALYPSE 
Your mission — fly your heli- 
™pter to capture fuel and 
pons from the Kraal than 
s of inner Earth, free the 
enslaved masses and destroy 
the fortress itself. Will you 
triumph or be crushed by its 
fiendish defenses? Encounter 
Fort Apocalypse! 



PROTECTOR II 
You are the last hope! The 
Fraxullan Slimehordes are 
attacking your cities and 
carrying off their citizens. 
Can you get your people to 
safety as volcanoes erupt and 
enemy forces conspire to 
thwart your every effort? 




^ 



5221 Central Avenue, Richmond, CA 94804 • (415) 527-77 



c[M*Dmfl SOFTWARE 



GUIDES YOU AND YOUR 
VIC 2(T DOWN ROADS OF 
ADVENTURE WITH: 



Maelstrom* 
Escape MCP* 
Gator Chase* 
Astro Command 
Caves of Annod 
Capture the Beast 
Whirlwind Rescue* 
Street Maze 
The Market 
Chivalry 



THROUGH TRAILS OF 
CREATIVITY WITH: 

• Sketch and Paint 
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Quality software also available 
for Pet and Commodore 64 computers 



ALONG THE PATH TO 
KNOWLEDGE WITH: 

• Wordspot 

• Math Tutor Series 

• Alphabet Tutor 

• Conversion 

• Gotcha Math 

• English Invaders 

• Math Invaders Series 

ASK FOR COMM*DATA 

COMPUTER HOUSE SOFTWARE 

AT YOUR LOCAL DEALER. 

Or Send for FREE Catalog: 

COMM*DATA COMPUTER HOUSE 

320 Summit Avenue 

Milford, Michigan 48042 

(313) 685-0113 

Dealer Inquiries Welcome. 






VIC 20 is a Registered Trademark of Commodore Business Machines, Inc. 
*High Res Full Machine Code Arcade Style Games. 
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King of the 




Workhorse solutions 
for tough questions. 

When Southern Solutions acquired the exclusive marketing 
rights for the CMS Accounting System, the first (and the best) 
accounting system for the Commodore computer we offered 
dealers who were dissatisfied with their current accounting 
software the opportunity to swap . . . ours for anyone else's. 

WOW! We were covered with the others ... MAS. BPI. 
EBS. etc ... all trading for CMS. We provide the only 
complete coverage of real software for Commodore 
computers: 

THE PREMIER . . . SYSTEM IV Real 
accounting. More like a mini, yet priced for the 
Commodore. SuperMath™ gives precision to 
$1 billion. No one else comes close. 
General ledger accounts receivable, 
accounts payable, payroll, inventory, 
mailing list Plus important vertical 
products: oil accounting, pharmacy 
management encumbrance 
accounting, church records and 
more. 

THE STANDARD... 
SYSTEM III. Similar to 
System IV but lower priced. 
G/L A/R A/R P/R. mailing list 

Commodore 64*. 
Complete line of bookkeeping 
record keeping, personal and 
household management 
Usually sells for under $100. 
Uses one or two drives, just about 
any printer 

Peripherals. Monitors, monitor 
cables, blank cassettes. 

All software has FileGuard™. Never 
lose data files, EVEN IF YOU LOSE 
ELECTRICITY! Compatible with almost any 
computer disk drive and printer 
combination. User-definable reports. Fast 
file access. 

Sold only through professional 
computer dealers. 

To become a Southern Solutions 
dealer or for the name of your nearest 
retailer call or write our General 
Manager Bill Swingler 

Dealer Hotline: 1-800-527-4548 



•Commodore 64 is a registered 
trademark of Commodore 
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FLOPPY DISK DRIVE FOR VIC-20 AND COMMODORE 64 



GROW WITH US! 

EXPANSION PRODUCTS FOR 
YOUR MICROCOMPUTER 



Super Disk is a Commodore com- 
patible disk drive designed to interface 
to the various Commodore computers 
such as the PET, VIC-20, and the 
Commodore 64. The disk drive is com- 
patible to the model 4040, 2031 , 1540, 
and 1541 disk drives and recognizes 
programs generated on any of these 
disk drives. The capacities are com- 
parable to those found on the Com- 
modore drives, and Super Disk 
recognizes the full instruction set of the 
Commodore drives. Super Disk offers 
8K RAM area within the disk unit, and 
a seriai and an IEEE bus interface. The 
following technical specifications apply 
to Super Disk. 

Disk Parameters: 5.25 inch single-sided, dou- 
ble density diskette media; number of tracks - 
35; number of sectors per track — 17 to 21 
(variable); sector size — 256 bytes; number of 
sectors per disk — 683. 

Capacities: User sectors per disk - 667; disk 
capacity - 174,848; data capacity - 168,656; 
relative data capacity — 167,132; program 
capacity - 168.656; directory capacity — 144 
Filenames. 

Electrical Interface: Power requirements — in- 
put voltage - I10/220volts +/- 10%; frequen- 
cy - 50 or 60 Hertz; power — 30 watts. Com- 
puter interface — Commodore type SERIAL bus 
or Commodore type IEEE bus. 

System Features: 16K ROM based operating 
system; 6K RAM area; 6511 Q Microprocessor; 
Power on self test diagnostics. 





Win a FREE 
trip to Hawaii 

Join our 
"Grow With Us" 

Club 
The more you 

buy 

the better are 

your 

chances. 

Details at your 

Dealer 



Ask for us by 
name 
MSD 



MSD also makes Port Expanders, 
RAM cartridges, Games, Audio 
Cassette Interface, Monitor 
Cables and Terminal Emulation 
Software. 



MICRO SYSTEMS 
DEVELOPMENT, INC. 

(214)241-3743 
11105 Shady Trail • Suite 104 • Dallas, Texas 75229 



Dealer Inquiries: 
1-800-527-5285 



PET, VIC-20, and Commodore 64 are trademarks of Commodore 
Business Machines, Inc. Super Disk is a copyright of Micro Systems 
Development, Inc. 
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JOIN THE 

COMPUTER 

REVOLUTION 

WITH A MASTERY 

OF THE KEYBOARD! 

In the age of the computer, everyone 
from the school child to the Chairman of 
the Board should be at home at the 
computer keyboard. Soon there will be 
a computer terminal on every desk and 
in every home. Learn how to use it right 
...and have some fun at the same time! 

Rated THE BEST educational program for the VIC 20™ 
by Creative Computing Magazine 

TYPING TUTOR PLUS WORD INVADERS — $21,95 

(2 programs on one cassette tape for the unexpanded VIC 20™) 

Typing Tutor plus Word Invaders makes learning the keyboard easy and fun! 
Typing Tutor teaches the keyboard in easy steps. Word Invaders makes typing 
practice an entertaining game. Highly praised by customers: 

"Typing Tutor is great!", "Fantastic", "Excellent", High quality", "A source of 
great joy and learning for our children", "Even my little sister likes it", "Word 
Invaders is sensational!" 

Customer comment says it all . . . 

". . . and it was everything you advertised it would be. In three weeks, my 13 year 
old son, who had never typed before, was typing 35 w.p.m. I had improved my 
typing speed 15 w.p.m. and my husband was able to keep up with his college 
typing class by practicing at home. " 




SPECIAL 
VERSION OF 
TYPING TUTOR 
PLUS WORD INVADERS 
NOW AVAILABLE FOR THE 
COMMODORE64™...$21 .95 (Tape) 

All of the features of the VIC 20™ Version and more 






SPRITE I°o^l R 
DESIGNER |! 
by Dr. Lee T. Hill \ 

$1 6.95(Tape) $21 .95(Disk) 

Create and then transform sprites automatically. We 
have the other sprite making programs, but this is the 
one we use to make sprites. The automatic transfor- 
mations are great! 

^^^^ Shipping and handling $1.00 per 
v!5i order. California residents add 6% 
^^^B sales tax. VISA and Mastercard 
orders must include full name asshown on card, card 
number, and expiration date. Free catalog sent with 
order and on request. 

ACADEIilV 

SOFTH^RE 

P.O. Box 9403, San Rafael, CA 94912 (415)499-0850 



Programmers: Write to our New Program Manager concerning any exceptional VIC 20TM or Commodore 64TM game or other program you have developed. 



Circle No. 2 



Call for Clubs and Newsletters Directory 

To be included in the future issues of the Commander Clubs and 
Newsletters Director, your club or publication must supply the follow- 
ing information: 

1 . name of organization or publication 

2. mailing address 

3. contact person and telephone number 

4. name of newsletter or publication 

5. special interests 

Send your information to Clubs and Newsletters Directory, Com- 
mander, PO Box 98827, Tacoma, WA 98498. 



Commander— The Monthly Journal for Commodore Computer Users is published monthly by Micro Systems 
Specialties, P.O. Box 98827, Tacoma, WA 98498. Domestic Subscriptions, 12 issues, $22.00. Second Class 
Postage pending at Tacoma, WA 98143 and additional mailing offices. Postmaster: Send address changes to: 
Commander— The Monthly Journal for Commodore Computer Users; P.O. Box 98827, Tacoma, WA 
98498. Entire Contents copyright ©1983 by Micro Systems Specialties. All Rights Reserved. 
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by Donald L Stoner 
Mercer Island, WA 



Recently I was asked to explain the 
difference between an "information 
utility" and a "data base." Most 
readers have heard the term "data 
base" but may not be familiar with an 
"information utility." I define a data 
base as a very narrow collection of 
specific information, while an informa- 
tion utility is a broad collection of 
general information. 

Virtually everyone reading this col- 
umn has used a data base at one time 
or another. For example, when you 
call the telephone company informa- 
tion operator, you are accessing an 
enormous data base of telephone 
numbers. The phone company 
operators have millions of numbers 
right at their finger tips (their computer 
keyboard). The operator can extract 
the correct phone number in seconds 
but he or she cannot tell you the 
weather in Houston nor who won the 
ball game last night. 

The public library fits my definition 
of an information utility. The little 
drawers, containing the 5x7 cards, are 
the data base for all the books contain- 
ed in the information utility. If you know 
where to look (or the 5x7 cards can tell 
you), information on virtually any sub- 
ject is available. 

There are literally thousands of data 
bases available to computer owners 
with telecommunications capability 
(those having a modem and communi- 
cations software). An extensive listing 
(but, by no means complete) is con- 
tained in a publication called "Direc- 
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tory of On-Line Data Bases." 

There are a dozen or so services 
that fit my definition of an "information 
utility." Most are intended for 
businesses and are horribly expen- 
sive. Costs in the order of $100 per 
hour are not uncommon! There are on- 
ly three that I feel are within the budget 
of the average person. One is called 
"Dow Jones News Service" and pro- 
vides extensive information on stocks, 
bonds, commodities, etc. One might 
argue that this makes DJNS a data 
base. However, Dow Jones also pro- 
vides news and other information of 
general interest (albeit with a business 
and financial slant). 

The cost of the information varies, 
depending on which of their services 
is being accessed. My 13 year old, 
Dan, is learning to play the market (on 
paper) and has racked up a fair-sized 
bill with Dow Jones! If DJNS is of in- 
terest, check with the folks at your local 
Radio Shack store. They sell a Univer- 
sal Sign-Up Kit, which provides one 
free hour on DJNS (see details below). 

A second popular information utility 
is called The Source, and is a sub- 
sidiary of Readers Digest, Inc. The 
Source can provide an enormous col- 
lection of information to telecom- 
municators. It is so extensive, in fact, 
that I plan to make this information utili- 
ty the subject of a separate column. It 
costs $1 00 to join The Source and ap- 
proximately $5 per hour for access 
time. See your local Computerland 
store to sign up. 



This month, I plan to devote the col- 
umn to one of the nation's largest in- 
formation utilities, CompuServe Infor- 
mation Service (CIS). You can pur- 
chase a subscription to CompuServe 
at your local Radio Shack store. It is 
called their Universal Sign-Up Kit (part 
number 26-2224) and costs only 
$19.95. In addition to the free hour of 
access time on Dow Jones (mention- 
ed earlier), you will receive a free "get 
acquainted" hour on CIS. 

CompuServe Information Service 
(CIS) is located in Columbus, Ohio and 
operates a large number of PDP com- 
puters made by Digital Equipment 
Corp. As a matter of fact, when you 
are connected into this utility, your 
VIC-20 or C-64 is actually running 
these powerful 32 bit "mainframe" 
devices . . . making the discs whir and 
accessing megabytes of memory. 

The reader may wonder "who can 
afford long distance calls to Columbus, 
Ohio?" Fortunately, it is not necessary 
to rack up a lot on long distance 
charges to "talk" to CompuServe. 
They have established their own 
telephone network and have local 
telephone numbers in all the major 
cities of the country. These are called 
I/O ports in and out of their network. 
For example, the telephone number 
for their Seattle port is 634-1713. The 
number answers automatically and 
sends the answer tone (see last 
month's column). 

As soon as I am connected to the 
local port, the information I send and 



receive is handled (along with many 
other users) on high speed telephone 
lines that CIS leases from the 
telephone company. In a split second, 
my keystokes arrive in Columbus, 
Ohio and tell the CIS computer what 
I want it to do. I am charged approx- 
imately $5 per hour (you can spend 
that playing Pac-Man!) for the use of 
their equipment and their transcon- 
tinental telephone network. If you have 
ever been charged for a long distance 
voice telephone call, you know this is 
quite a bargain price. 

What if your city does not have a 
CompuServe port (a local telephone 
number)? In some of the smaller cities, 
CIS sub-leases the lines of what are 
called "value added carriers" (VAC), 
such as TymeNet and TeleNet. The 
VAC equipment and setup is very 
similar to the proprietary network 
operated by CompuServe. However, 
access is slightly more complicated 
since you have to log in twice, once 
with the value added carrier (VAC) and 
once with CompuServe. How do you 
know if CompuServe has a local 
phone number or the location of the 
nearest VAC port? The easiest way is 
to check with your local Radio Shack 
dealer before you purchase your ac- 
cess package. If you have to use one 
of the value added carriers to access 
CompuServe (or most other informa- 
tion utilities), it will cost you slightly 
more per hour of on-line time. By the 
way, you don't have to stay on-line for 
a full hour. The billing equipment 
usually logs charges in six minute 
increments. 

It is somewhat difficult to explain an 
"information utility" to someone who 
has not yet connected his computer to 
the telephone network. The preceding 
definition (a collection of information) 
seems quite inadequate. 

Rather than describe it, why don't 
you log onto CompuServe with me 
and see what is available on the hun- 
dreds of menus sent to us over the 
telephone line? 

I made the accompanying printout 
of a recent session on CompuServe. 
The first step is to dial the nearest port. 
You will hear the phone ring a couple 
of times, then answer. After a couple 
of seconds, you should hear a pierc- 



*C 

User IDt 71625*1620 

Password! 

CompuServe Information Service 

8t 12 PST Saturday 19-Mar-83 

WHAT'S NEW 

Software Exchange Now Has 120 

Microcomputer Programs 
Aunt Nettie Moves to Fridays 
New Ueather Features 

For detailsf see What's New 
Enter: GO NEW at the ! prompt 
on any p&£e* 

Key <ENTER> for next padet 

CompuServe Pa2e CIS-1 

CompuServe Information Service 

1 Home Services 

2 Business & Financial 

3 Personal Computing 

4 Services for Professionals 

5 User Information 

6 Index 

Enter your selection number r 
or H for more information* 



!1 

CompuServe 
HOME SERVICES 



PaSe HOH-i 



1 News/Uleather/Sports 

2 Reference Library 

3 Communications 

4 Home Shopping/Banking 

5 Groups and Clubs 

6 Games and Entertainment 

7 Education 

3 Home Management 
9 Travel 

CompuServe PaSe FIN-1 

BUSINESS AND FINANCIAL SERVICES 
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ing whistle. When you have this, 
unplug the telephone handset and 
plug in your VIC Modem. You will not 
see anything on your screen until you 
send CompuServe a Control C. This 
is done (for most VIC and C64 terminal 
software) by depressing the F1 key. 
The control character is echoed back 
to you and this is the first thing you see 
on your screen (and the accompany- 
ing listing). This is followed by a re- 
quest for your user identification 
number. As you can see, from the 
listing, my number is 71 625, 1 620. The 
next step is to enter your secret 
password. Note that this is not echoed 
back to you, in case someone is look- 
ing over your shoulder. You would not 
want them to know your security 
number any more than you would for 
your bank card. 

At this point, you are logged into a 
CIS. A short preamble tells you what 
new information and features are 
available. This is followed by what is 
called the "top menu" (CIS-1 in the 
listing). You might think of the menu 
structure as a tree, with menu CIS-1 at 
the very tip-top. Each one of the selec- 
tions shows branches off to other 
menus (which sometimes lead to other 
menus!) 

To show you a broad cross section 
of the information available, I re- 
quested each of the menus for the 
items on the top menu. At any point, 
where you see the exclamation mark 
prompt (!), you can either type in the 
selection number, the letter "m" for 
the previous menu, or the letter "t" to 
set to the top menu and start all over. 

After each of the menus shown 
(HOM-1 , FIN-1 , PCS-1 , SFP-1 , CIS-4), 
I entered an "m" to take me back to 
the top menu. However, I edited out 
this repetitive menu so the listing re- 
quired as little space as possible in the 
magazine. 

Note that every information page 
has a designator (for example, CIS-1 , 
PCS-1 , etc.). If you know exactly where 
you want to go, you can jump to the 
page directly. This is what I did to get 
to the Commodore SIG (special in- 
terest group). If you have been follow- 
ing the listing, you will note that I 
entered "go PCS-1 16" at the prompt. 
CompuServe provides (both on-line 
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1 News/Reports 

2 Reference Databases 

3 Communications 

4 Brokerage Services 

5 Banking Services 

6 Discussion Forum 

7 Travel Services 

8 Personal Finance 
CompuServe 



Page PCS-1 



PERSONAL COMPUTING SERVICES 

1 News 

2 Reference 

3 Common i cations 

4 Shop at Home 

5 Groups and Clubs 

6 Programmer's Area 

CompuServe Page SFP^l 

Services for Professionals 



1 


Agribusiness 








2 


Aviation 








3 


Engineer ins/Technicsl 






4 


Environmental 








5 


Legal 








6 


Medicsl 








CompuServe 


Pssfe 


CIS- 


-4 



USER INFORMATION 

1 What's New 

2 Command Summary & Usage Tips 

3 FEEDBACK* Manuals* Products 

4 Changing Terminal Defaults 

5 Chsn£in£ Your Password 

6 Reviewing Your Charges 

7 Changing Credit Card Info 

8 Telephone Access Numbers 

9 Current Rates 

10 CompuServe Viewpoint 

11 Electronic Bounce Back 



?go pes -116 



Page PCS-116 



CompuServe 

Reauest Recorded* 
One Moment? Pleese 
Thank You for Waiting 

Welcome to Commodore Computers 



and by mail) a listing of each page. 
From previous experience, I knew the 
Commodore bulletin board entry page 
was PCS-116. 

There is a slight pause (One Mo- 
ment Please) while CIS finds which 
host computer that the information is 
on. After a few seconds, my keyboard 
is connected to the Commodore data 
base. Their program knows who I am 
from my ID number, advises me the 
last time I was connected and what the 
high message number was during that 
connection. It also tells me that I 
am the 60275th person to use the SIG 
and what message numbers are 
presently being stored (all old 
messages "drop off" the bottom of the 
pile like leaves on a tree). 

By entering an RM, I can retrieve 
any messages marked to my attention. 
Since there were none, I entered a RR 
for reverse retrieval of messages. I 
listed out message 19002 from a fellow 
named Neil to Commodore (the 
SYSOP, or system operator). At the 
end of the message, I can either Con- 
tinue, Reply or go to the Top. Select- 
ing "T" takes me back to the function 
prompt. 

Here again, I can go directly to the 
entry page of another SIG. The pro- 
gram tells me the exit date and time 
and the number of the highest 
message I retrieved. Following this, I 
was transferred directly to page 
CEM-450the SIG for Computers and 
Electronics Magazine. 

Again, I was transferred to another 
host computer. This time, I found there 
was a message waiting for me. After 
reading the message, I made an im- 
mediate reply (RE). There is a whole 
"raft" of editing commands available 
if I make a mistake entering the 
message or if I decide to change the 
way I say something. By entering the 
blank line (depressing the RETURN 
key, without having typed any 
characters), the program knows I am 
done and gives me the option of 
editing, listing or saving the message. 
As you can see, I saved it, then log- 
ged off of CompuServe (not shown). 

Once again, we are out of space, 
but I will be looking forward to seeing 
you here again next month. Until then, 
keep on telecommunicating. □ 



Name* 
Last on t 
High mss*I 



Don Sterner 71625*1620 



12~M3r-83 
18055 



07*05105 



You are user nuither 60275 
System contains messages 
18548 to 19003 

Function ♦ rm 

No marked messages present 

Function t rr 

System contains messages 

18548 to 19003 

Starting message number *9002 

t: 19002 Sec* 2 - Vendors 
Shi VIC/C64 C0MPAT? 

19-M3r-83 07154103 
Fnit NEIL MCANALLY 73225*263 
Tot COMMODORE BUS MACH* 

I'M CONSIDERING REPLACING MY VIC 
WITH A NEW 64* I NEED TO KNOU 
WHETHER I CAN RUN VIC SOFTWARE ON 
THE 64 f AND WHETHER MY VIC 
PERIPHRALS WILL FUNCTION ON THE 
NEW UNIT* CAN SOMEONE AT THE 
COMPANY STRAIGHTEN ME OUT ON THESE 
QUESTIONS? THANKS FOR YOUR TIME. 
SIGNED: NEIL MCANALLY 73225*263* 

(C RE T ):t 

Function? go cem-450 

Exiting at 19-Msr-83 08:23**41 
Last message on system* 19004 
High message retrieved: 19004 
Thank you for visiting Commodore 




CompuServe 



Page CEM-450 



Reouest Recorded ? 
One Moment? Please 
Thank Yqu for Waiting 

Welcome to CEMSIG, V. 1A( 46 ) 

Namet DON STONER 71625,1620 
Last on: 19-Msr-83 08121:21 
High msg*I 9357 

You sre user number 21533 
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A Giant Step 

for the computerist 

THE PRDmOUEEn 

Opens up the world of modern elec- 
tronics. Now - a complete microde- 
velopment system in a cartridge using 
the Commodore VIC-20. You get 
HEXKIT 1 .0 for general purpose 8 bit 
microprocessor software develop- 
ment, a 4K ROM emulator for testing 
program in circuits under develop- 
ment plus an EPROM programmer 
for making hard copy of programs. 
All-in-one cartridge ^^aaaa 
with 1 00 page *1 Q QUU 

tutorial manual. I w w 

Gloucester Computer, Inc. 

1 Blackburn Center, 
Gloucester MA 01 930 
Phone 617-283-7719 
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Intelligent Software For 
Commodore Computers 

Copycalc Is an affordable electronic 
spread-sheet which turns your video screen 
into a window on a matrix of numbers. Cur- 
sor around the matrix, enter numbers; the 
totals reflect the changes. You can save the 
matrix to disk or tape, or print it or your 
printer. For S20 ($15 with another program), 
this program might justify the cost of your 
computer. Requires 6k RAM; smaller version 
available for a standard VIC. 

Word Processor Plus was not designed 
to be an expensive toy; it was designed 
solely to facilitate correspondence, for a 
wide range of personal and business uses, 
quickly and easily, with a minimum of train- 
ing and frustration on the part of its user, 
and at the least possible cost, both in hard- 
ware and software. The most thoroughly 
tested, useable word processor available 
at anywhere near the price, $25; 10k RAM, 
printer req'd.; RS-232C version available for 
VIC and 64. 

Also available: Baseball Manager, a 
sports-documentation program; and Inven- 
tory, a perpetual inventory control program 
for a small retail business (various reports, 
multiple vendors); S30 each; 10k RAM 
req'd., printer suggested. 

All programs will load and run on any 
Commodore computer; all support tape, 
disk, and printer. 

Prices Include documentation and ship- 
ping; Calif, residents add 6%. Please 
specify hardware configuration when 
ordering. Sorry, no games available. 
Wlllam Robblns, Box 3745, San Rafaal, CA 94912 



System contains messages 
0950 to 9418 

You have s message* wsitinsit 
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Sbt VIC CASSETTE 

17-Mar-83 22t22J04 
Fit*: EDWARD COLE 74575*1466 

These messages have been msrKed 
for retrieval with the RM command 



Function t rr 
*t 9332 
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SfoJ VIC CASSETTE 

17-har-83 22:22t04 
Fm! EDUARD COLE 74575*1466 
Tot DON ST0NER 71625*1620 

PLEASE GO INTO DETAIL ON THE VIC 
PROGRAM THAT UPLOADS AND DOWNLOADS 
TO CASSETTE* IS THIS THE VICTERM-40? 
I WOULD APPRECIATE YOUR HELP IN THIS 
MATTER* •.BEST WISHES 

(CRET) <D=delete >! re 

It 

Hi Edu3rd** no* I think VicTera 40 is 

Just 3 dumb terminal* 

2t 

However* this program scfctusily "hsnd 

shakes" CompuServe 

3t 

while it dumps the downloaded dsta to 

the Datasette* It 

4t 

will be announced by Bytesize Micro 

Technology next month 

5t 

for about *19*95* Works with 3*8K 

of memory* Will Keep 

6t 

you posted* Regards dls 

7% 

Leave option* s 

Mess33© # 9419 Stored 
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RAMAX 

/N M i y by APROPOS 

The UNLY MEMORY your VIC-20® will need 



FEATURES 

• A full 27k bytes of RAM 

(added to VICs 5k 
equals 32k.) 

• Fully switchable in sections 

BLK 1 switches 8k 

(Adr. 8 192 to 16383) 
BLK 2 switches 8k 

(Adr. 16384 to 24575) 
BLK 3 switches 8k 

(Adr. 24576 to 32767) 
BLK 5 allows/disallows your 

8k ROM (games) 

(Adr. 40960 to 491 52) 
RAM switches 3k (Adr. 1 024 to 4095) 
• May be used with Super Expander® 
games or ANY other VIC-20 
compatible cartridge. 

• Built in RESET switch. 

• Fuse protected. 

• Totally self-contained. 

• 2 duplicate extension connectors for any device 
normally plugged into the expansion port. 
(BLK 5 is switched to connectors) 

• Very low power usage. (.150 amp max.) 

• High reliability gold plated connectors. 

• 6 month parts and labor warranty. 

• Factory service. - Extended service always available. 

THIS SUPERB PLUG-IN GIVES YOUR VIC-20 
REAL POWER AND EXPANDABILITY 

FOR ONLY $149100 Shipping included 

1 DAY SATISFACTION OR YOUR MONEY BACK GUARANTEE 

Already own an 8k Expander? The new 19k RAMAX 
JR.™ allows you to use your 8k Expander as BLK 3 to 
get the full compliment of memory. Complete instruc- 
tions Included. Only $129, Includes shipping. 

WE SERVICE WHAT WE SELL 

TO ORDER: 

Send Check or Money Order For the Total 

Calif, residents add 6% tax. 

Phone orders: CALL (805) 482-3604 24 HRS. 

For credit card orders, include all information on card. 

or contact your local dealer. 

Foreign orders, add $1 5.00. 

All items shipped from stock. 
DEALER INQUIRIES WELCOME 




•APROPOS TECHNOLOGY, 



SOFTWARE 
DR. FLOYD 

Psychoanalysis by computer? — well, not quite, but Dr. Ftoyd will 
carry on a conversation with you using psychoanalytic techniques 
giving the appearance of artificial intelligence. Requires 16k RAM 
or more. 
$14.95 shipping included. 

WORD PLAY 

"WORDPLAY" is a collection of programs which allow the user to 
make original stories, write a form of Japanese poetry, play the fun 
game of Animal (children love this one), and create jargon. A 
bonus secret message (cypher) program is also included. In a 
word, "WORDPLAY is a bargain. 
Requires 1 6k RAM or more. 
$1 4.95 shipping included. 

TYPE FOR YOUR LIFE 

With more challenge than an arcade game, learn to type up to 75+ 
words/min. (User selectable, but no FOOLING AROUND allowed). 
TEXT IS WIDELY VARIED SINCE IT COMES FROM THE 
PROGRAM TAPE. Action color graphics with sound fix your eyes 
to the screen (away from your fingers - clever!) Your man rows 
your boat up stream as fast as you can type. Maintain speed and 
destroy the Sea Monster; slow down and he will get you. Runs on 
the unexpanded VIC. 
$14.95 snipping included. 

All software is on high quality cassettes 
and is replacement guaranteed. 

VIC-20 & SUPER EXPANDER are registered 
trademarks of Commodore Business Machines, Inc. 

350 N. Lantana Ave., Suite 821 
Camarillo, CA 93010 
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A program is described for creating 
a file of dated entries of stock market 
data that is often used in market 
analysis. Techniques for assembling 
the data in strings, saving on tape files 
for future use, and recovery of specific 
items are discussed. The program also 
provides for adding to the data list or 
modifying it. The program as listed will 
run on any PET with 8K RAM. Techni- 
ques useful in other programs are 
pointed out. 

There are many computer applica- 
tions utilizing an extensive data base 
such as a time series for analysis of 
trends. This program is designed to 
generate such a data base, update it, 
modify or select portions of the data, 
and store the data in a tape file for later 
use. A number of programming tech- 
niques are illustrated by this program 
and will be specifically described as an 
aid to other programming applica- 
tions. Programming is in BASIC and 
can be followed by the beginning pro- 
grammer. 

The example given here is taken 
from my stock market analysis pro- 
grams where a time series of stock 
market data is built up consisting of 
date, price (P), number of stocks ad- 
vancing (AD) and number of stocks 
declining (DE). The items may be ex- 
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panded if desired. The listing given will 
run on a PET with only 8K RAM, but 
the amount of data which can be 
stored is limited. With more memory 
available, the data handling capabil- 
ity can be extended simply by increas- 
ing the Dimensions in line 40. With 1 6K 
memory, daily data for over a year can 
be stored along with additional pro- 
gramming for analysis. 

The program is menu driven, pro- 
viding the following selections (see 
lines 2010-2075). 

CREATE DATA TABLE 
READ DATA TABLE 
SAVE DATA ON TAPE 
ADD TO DATA TABLE 
SELECT DATA 
CORRECT DATA ERROR 
PRINT DATA TABLE 

These items are largely self explana- 
tory. The item SELECT DATA permits 
one to select a block of data from the 
total series. It is useful for discarding 
old data to shorten the series, but it 
can also select a block within the 
series. The selected block can be 
saved in a tape file as a part of a new 
series. When read back, it becomes 
the main table. The PRINT DATA 
TABLE selection is given merely to 
demonstrate recovery of the data com- 



ponents. After this recovery one would 
normally go to some analysis program 
rather than just printing a list. 

In creating the table you are first ask- 
ed to INPUT the month as three letters 
(subroutine 10000), then the year as 
2 digits (line 2220). This is followed by 
a print of the table heading and a re- 
quest for inputs under each item of 
DAY, PRICE, ADVANCES and DE- 
CLINES. Preceding each DAY is 
printed a number (K) starting with one 
(1) which keeps track of the number 
of line entries and is used as a line 
reference for the data for each date. 
This subprogram is contained in lines 
2200-2360. To terminate the data en- 
try you are instructed to enter DONE 
which returns the program to the 
menu. The three components of the 
data are entered as strings and these 
together with the numerical values for 
P, AD, and DE, converted to strings, 
are added (concatenated) in line 2320 
as Y$(K). The symbols # and * are 
field separators. All the data for a given 
date is then contained in Y$(K) with K 
providing a serial number correspond- 
ing to the date. Line 2260 adds a zero 
ahead of each day number less than 
10 so that each day is two characters 
long. The complete date is thus 
located in the first seven characters of 
Y$ and is recovered in line 2330 as 
DT$. 

Collecting the various components 
in a single string simplifies the hand- 
ling procedures. When the individual 
components are of known length, as 
in the date, each may be recovered by 
a LEFTS or MID$ function. The re- 
maining three components are of 
unknown length, hence the need for 
the field separators. The separation 
technique is illustrated in lines 
3300-3410. FOR-NEXT loops are us- 
ed to find the field separator and the 
component is then found by a MID$ 
function. As each component is found, 
the next FOR-NEXT loop may start 
from the previous separator. If this is 
done, the separator symbols may be 
repeated. Fixed length components 
may also be located at the end of the 
string and found by RIGHTS and MIDS 
calls measured from the length of the 
string (LN). 

Another useful technique is demon- 



strated in creating the data file which 
saves inputs of repetitive values. The 
program may use daily or fairly fre- 
quent time intervals. Once the starting 
year and month are entered only the 
day is called for. Since the value of the 
day values increase during the month, 
when a day number less than the 
previous number is encountered, line 
2270 senses this and the subroutine 
1000 is called asking for the new 
month to be entered. When this oc- 
curs, line 2270 also notes when the 
new month is JAN and automatically 
adds one to the year number. This 
technique materially reduces the key- 
strokes needed for inputting a series 
of dates. 

When the data series is terminated 
by entering DONE, the last data 



reference number is recorded as KM 
and the last date as LD$ (line 1300). 
When the data is saved on tape, lines 
3000-31 20, the number of items is first 
entered in the file for it will be needed 
when the file is read, lines 2400-2530. 
In this program there is a choice of files 
to be saved, either the complete file Y$ 
or a selected portion Z$. The number 
of items saved is MX which is either the 
number KM in the complete table or 
KS, the number in the selected table. 
Likewise, the last date saved is DT$ 
corresponding to either LD$ or LS$. 
This last date saved is DT$ correspon- 
ding to either LD$ or LS$. This last 
date is important when adding to a file 
to denote the starting point for the new 
data. 
The files must first be opened (lines 



2430 and 3040) and should be clos- 
ed when the operation is completed. 
The reading program must corres- 
pond exactly to the saving program, 
that is, the order of the items must be 
the same. The designation of the 
variables may differ, but not the 
character, that is, strings must corres- 
pond to strings and numbers to 
numbers. 

The listing that follows can be keyed 
into most any computer using BASIC 
with only minor changes. The changes 
which you would probably need to 
make are the clear screen instruction 
which is CHR$(1 47) here and the cur- 
sor control shift up one CHR$(145) 
found in lines 2290-231 0. Also, the file 
handling instructions must conform to 
the particular computer. □ 
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REM DATA BASE FILES 

CT*=" ENTER CONT WHEN READY " : ER*=" ERROR" 

DIM Y*(50) ,DC50>,K(50) ,D*C50) , Z*<50) : GOTO 2000 

PRINT"NO. DATE PRICE ADVANCES DECLINES" : RETURN 

PRINT"NUMBER OF DATA ENTRIES=" ; KM: RETURN 

PR I NT "LAST DATE ="; LD*: RETURN 

PRINT" INSERT DATA CASSETTE- ": RETURN 

D*(K)=LEFT* (Y*CK) , 2> : D (K) ~VAL CD* CK) ) 

M*=MID*CY*<K) 1^*3) : YR*=MIDS(Y*(K) ,6,2) : RETURN 

PRINT, "VALUE TOO LARGE" ; RETURN 

IF A*=""GOTO 200 

60T0 2000 
PRINT: INPUT" MONTH <3 LETTERS >"; M*: PRINT 
IF LEN(M*><>3 THEN PRINT ER*:SOTO 1000 
RETURN 



PRINT TAB (10) 



IF LEN(YR*)<>2 

RETURN 

YR=VAL < YR$) : YR=YR+1 



INPUT" YEAR <2 DIGITS>" ; YR*: PRINT 
PRINT ERSsGOTO 1020 



YR*=STR* ( YR> : YR*=RIGHT* ( YR*, 2) : RETURN 



PRINT CHR$(147):FRINT,"« CREATE DATA TABLE *": RETURN 

PRINT CHR*(147),"* TO CORRECT ERROR *":G^1 

PR I NT "RETYPE DATA FOR THIS ITEM" : INPUT" ITEM NUMBER" ;K 

GOSUB 100: GOTO 2240 

KM=K-1 : D$=STR* (D (KM) ) : LD*=D*+M*+YR$: G=0: GOSUB 80 



PRINT CHR*<147), "** DATA 
PRINT TAB ( 12) 5 "SUBPROGRAMS" 
PR I NT "TO SELECT SUBPROGRAM, 
CREATE DATA TABLE"," 



FILE **":PRINT 
PRINT; G=0 
, , "ENTER" 



PRINT 



PRINT, 
PRINT, "READ 
PRINT, "SAVE 
PRINT, "ADD 



DATA TAPE ",,"2" 
DATA ON TAPE " , " 3 ai : PR I NT 
TO DATA TABLE", "4" 

PRINT, "SELECT DATA" , f "5" 

PRINT, "CORRECT DATA ERROR", "6" : PRINT 

PRINT,"PRINT DATA TABLE", ,I 7" 

INPUT I 

ON I GOTO 2200,2400,3000,2800,3200,1200,3300 
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2200 
2210 
2220 
2225 
2230 
2235 
2240 
2250 
2260 
2270 

2290 
2300 
2310 
2320 
2330 

2340 
2345 
2350 
2360 
2400 
2410 
2420 
2430 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2800 
3000 
3010 
3O20 
3030 
3035 
3040 
3050 
3060 
3070 
3075 
3080 
3O90 
31O0 
3110 
3120 
3200 
3210 
3220 
3230 
3240 



BOSUB HOO:M*="":K=1 

IF M*=""THEN QDSUB 1OO0 

INPUT "YEAR <2 DIGITS>";YR* 

IF LEN(YR*)<>2 THEN PRINT ER*:G0T0222O 

BOSUB U0O:PRINT"WHEN FINISHED, ENTER DONE FOR DAY" 

IF 6=0 THEN GOSUB SO 

BOSUB 60 : PR I NT K ; s I NPUT " DA Y " ; D* : I F D*= " DONE " THEN 1 300 

VL=VAL(D*):IF VL<0 OR VL>31 THEN PRINT ER*:60T0 2240 

IF VL<10 THEN D*="0"+D* 

D(K)=VL:IF D (KXD (K-l ) THEN GOSUB 1000: IF M*=" JAN"THEN 

GOSUB 1050 

PRINT TAB (11) ;CHR* (145);: INPUT P 

PRINT TAB (22) ; CHR* ( 145); .-INPUT AD 

PRINT TAB (32) ; CHR* (145) ; : INPUT DE 

Y*(K)=D*+M*+YR*-*-STR*(P) + "# ,, +STR*(AD)+ ,, *"+STR*(DE) 

DT*=LEFT* (Y* (K) , 7) 

PRINT CHR* (147): GOSUB 60:PRINT K; TAB (6) ; DT*; 

PRINT TAB(15);P;TAB(24);AD;TAB(34);DE 

IF G=l GOTO 2O0O 

K=K+1:GDT0 2240 

PRINT CHR*(147), "* READ DATA FROM TAPE *" 

GOSUB 90 

INPUT-WHICH FILE NO. ";F 

OPEN F, 1,0 

INPUT#F,KM 

INPUT#F,LD* 

FOR J=l TO KM 

INPUT#F,Y*(J> 

PRINT J;") ";Y*(J) 

NEXT! CLOSE F 

BOTO 2000 

PRINT CHR* ( 147) :K=KM: BOSUB 100:K=K+1 ; GOTO 2230 

PRINT CHR* (147),"* SAVE DATA ON TAPE *" 

PRINT"TO SAVE MAIN FILE, ENTER 1 " 

PR I NT "TO SAVE SELECTED FILE, ENTER 2" 

INPUT I: GOSUB 90 

POKE 243, 122: POKE 244,2 

INPUT"FILE NO.";F:DPEN F,l,l 

IF 1=1 THEN MX=KM:DT*=LD*:GOTO 3070 

MX=KS: DT*=LS* 

PRINT#F,MX 

PRINT#F,DT* 

FOR J=l TO MX 

IF 1=1 THEN PRINT#F,Y*(J):GOTO 3110 

PRINT#F,Z*(J) 

POKE 594 11, 53: NEXT: CLOSE F 

GOTO 2000 

PRINT CHR* (147), "* SELECT PORTION OF DATA *": GOSUB 70 

I NPUT "STARTING NO. OF ENTRIES TO BE SAVED ";S 

IF 5>KM THEN GOSUB HO:G0T0 3210 

I NPUT "LAST NO. OF ENTRIES TO BE SAVED" ;L 

IF L>KM THEN GOSUB HO:G0T0 3230 
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3250 FOR 1=1 TO L-S+l 
3260 Z*(I)=Y*<S+I-1) : 

NEXT 
3270 K5=I-1:LS*=LEFT* 
(Z*(I-1> ,7) :GOTO 2000 
3300 GOSUB 70:GOSUB 

80:G0SUB 60 
3310 FOR J=l TO KM 
3320 DT*=LEFT* ( Y* ( J ) , 

7);LN=LEN(Y*(J) > 
3330 FOR K1=S TO LN: 

IF MID*(Y*(J) 5 K1, 1) 

="#"THEN 3350 
3340 NEXT 
3350 P=VAL(MID*(Y*(J) 

«,9,Kl-9>> 
3360 FOR K2=K1 TO LN: 

IF MID*(Y*(J) ^2, 1) = 

"* U THEN 3380 
3370 NEXT 
3380 AD=VAL(MID*(Y* 

(J) ,Kl+2 !l K2-Kl-2) ) 
3390 DE=VAL(MID*(Y* 

(J) ,K2+2,LN-K2-1> ) 
3400 PRINT J; TAB (3); 

DT*;TAB(12);P;TAB 

(21); AD; TAB (31) ; DE 
3410 NEXT J 
3500 PR I NT: PR I NT 

"ENTER CONT":STOP: 
G0T02000 



ATTENTION OWNERS OF 



ft commodore 

VIO20 "» 




WE SPECIALIZE 

IN SOFTWARE & 

ACCESSORIES FOR 

THE VIC-20tm 



Huge Selection 
Fast Service— Low Prices 

W5TJ0^C_ALLJ0^FREE^ATAL0G 

THE SOFTWARE CLEARING HOUSE 

Dept. C-1 , P.O. Box 68756 

Indianapolis, IN 46268 

(317) 353-4855 

NAME. 



ADDRESS 


CITY 


STATE ZIP 

MasterCard & Visa Accepted 



PLAYFUL MADE USEFUL 

Stop playing games and start programming your 
Commodore® with PC-DocuMate™, the keyboard 
template designed with the new programmer in 
mind. PC-DocuMate™ surrounds the keyboard 
with logically formatted, comprehensive reference 
data. The essential information you need is at your 
fingertips. Programming your VIC-20® or Commo- 
dore 64® has never been easier. Order your PC- 
DocuMate™ today for only $1 2.95! 

BASIC statements and 
options are documented 



Complete reference for 
MUSIC programming 




FEATURES 

• Control keys defined 

• BASIC language reference 
(Commands/Statements/ 

Functions) 

• Music programming guide 

• Screen memory map 

• Color graphics reference 

• VIC-20® and CBM-64® 
versions 



Color and character 
SCREEN map defined 



PC-DOCUMATE ™ IS ONLY *12.95 ( ^^ 

Please send personal check, money order, or credit card 
information. Specify VIC-20® or Commodore-64® version. 
Foreign orders add $5.00 {except Canada). No COD's please. 
Telephone orders: Call 91 9/787-7703. nc resents add 4% sales tax 
No-Risk, Moneyback Offer If you are not completely 
satisfied, return your PC-DocuMate™ to us (undamaged) within 
10 days for a full refund. 



Systems Management Associates 

3700 Computer Drive 
P.O. Box 20025, Dept, N-1 
Raleigh, N.C. 2761 9 
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An Introduction to Assembly Language 
Programming on the VIC-20 



Part VI — More Branches 

by Eric Giguere 
Alberta, Canada 



Last month my column concen- 
trated on branches and comparisons 
in assembly language, as well as a bit 
on loops. Unfortunately, I ran out of 
space before I could explain all the re- 
maining branch instructions and get 
into more detail on loops. So this 
month I won't get into another topic, 
but simply continue where I left off last 
month. 

BCC and BCS 

These two instructions cause the 
computer to branch if the carry bit in 
the status register is clear (0) or set (1), 
respectively. The carry bit is used 
mainly with the math instructions, and 
since I'm going to discuss those next 
month, I'll leave these for then. 

BMI and BPL 

These two instructions cause a 
branch if the N flag in the status 
register has the proper setting. The N 
flag determines if a byte is positive 
($0B-7F) or negative ($80-$FF), and 
relates directly to bit 7 of a byte. For 
example, loading the accumulator with 
$FE would set the N flag, because bit 
7 is on: 

$FE = °/o 1 1 1 1 1 1 1 
Loading a register with a positive 
number (one without bit 7 set) would 
clear the N flag. BMI is the branch that 
works if the N flag is set, while BPL 
works if clear. It's easy to remember 
how these two work because BMI and 
BPL stand for Branch on Minus and 
Branch on PLus, respectively. Thus 
you know that a number with bit 7 set 
will branch on BMI because this 
means that it is negative. BPL works 
in a similar fashion, except it operates 
on positive numbers. You can use 
these instructions in a program to 
check if a value is within a certain 
range, as such: 
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LDA $121C 
BMI ERROR 



In this example the computer will 
branch to the routine labelled ERROR 
(not shown here) only if the value in 
$1 21 C is greater than $7F, and is thus 
negative. If the BMI was changed to 
BPL, the branch would occur on a 
value less than $80. 
BVC and BVS 

These two instructions are used to 
detect an overflow via the V flag in the 
status register. An overflow occurs 
when two binary numbers of the same 
sign are added and the sum has the 
opposite sign. This is not necessarily 
an error condition, but sometimes 
when you add signed numbers you 
don't want this (it doesn't make any dif- 
ference if you don't care about the 
signs of the numbers). Also, an 
overflow will only happen if the two 
values together exceed the allowable 
range for signed numbers (-128 to 
+ 1 27). An example is adding - 1 28 
to -128: 

sign 

1 0000000(-128) 

plus 1 0BBB0fflffl(-12 8) 
1 BBBBBBBB 

extra bit ignored, so value becomes 
%000000BB. 

As you can see, the resultant from 
this addition is %BBBB0BB0, and 
causes the overflow flag to be set, 
because we added two negative 
numbers and the result is considered 
positive. Again, more on this in some 
future column. 
Using Branches 

Last month I briefly discussed using 
branches to create loops. These loops 
can be used for practical purposes 
within a program, as such: 



for VIC/C64 
LOOP LDA $C5 
CMP #$40 
BEQ LOOP 
for PET/CBM 
LOOP LDA $97 
CMP #$FF 
BEQ LOOP 

Location $C5 ($97 in PET/CBM) is 
a location in memory that holds the 
current value of the key currently be- 
ing pressed. If no key is being press- 
ed, it holds a value of $40 ($FF in 
PET/CBM). What the program does, 
then, is load the accumulator with the 
value in $C5 (or $97) and then use a 
CMP to check if a key is being press- 
ed or not. If a key is being held, the 
computer will leave the loop and con- 
tinue with the code after the example. 
Otherwise it will simply continue 
loading the accumulator and compar- 
ing until you do press a key. You can 
do the same thing from BASIC using 
the following: 

10A = PEEK(197):IFA = 64THEN1B: 

REM FOR VIC/C64 
10 A = PEEK(151):IFA = 

255THEN10:REM for PET/CBM 

I could have coded it as 10 
IFPEEK(197) = 64THEN10 (for VIC/ 
C64), but I just wanted to make it 
resemble the machine language code 
as much as possible, so I "loaded' 1 the 
variable A with the value and then did 
a comparison and branch. You might 
also find it easier to think of the 
registers as "variables/ 1 The accumu- 
lator would become A, the X- and Y- 
registers X and Y, and the status 
register S, subdivided into C,N,V and 
Z. If this helps you to understand what 
I'm talking about, then by all means 
use it. 

Getting back to our little program, 
we can alter it very easily to wait for 



you to press a certain key and ignore 
all others. The new program is as 
follows: 

VIC/C64 
LOOP LDA $C5 

CMP #$xx 

BNE LOOP 

PET/CBM 
LOOP LDA $97 

CMP #$xx 

BNE LOOP 

All we did was change the CMP and 
the BEQ. Now the computer will wait 
until you press the key that has the 
value of xx (you put in the value you 
want). Anything else will be ignored. 
To find out what value to use, RUN the 
following short routine: 

10 PRINTPEEK(197):GOTO10: 
REM FOR ViC/C64 

10 PRINTPEEK(151):GOTO10: 
REM FOR PET/CBM 

Your screen should fill with numbers. 
The program prints out the current 
value of the key being pressed by 
PEEKmg location 197 (151 for 
PET/CBM). As long as you don't press 
a key, the value from that location 
(which I've named KEYMAT) should 
be 64 for the VIC/C64, or 255 for 
PET/CBM. Now press a key; the value 
changes. Find the key you wish to use, 
press it, and note its value. Then 
replace the variable xx in the machine 
language program with that value. For 
example, on the VIC/C64 the space 
bar's value if pressed is 32. If we place 
this in the program instead of xx, the 
CMP instruction will read CMP #$20 
($20 = 32). Now the program will loop 
until you press the spacebar. Wasn't 
that neat? (You can also use this in 
BASIC, instead of GET. Just use the 
statement X = PEEK(197) and a few 
IF. .THEN statements to check for a 
proper value. The nice thing about it 
is that it repeats and ignores the shift 
key, so you don't have to worry about 
these.) 

The monitor listing for this program 
is as follows: 

VIC/C64 

.:033c a5 c5 c9 xx d0 

.:0341 fa 00 00 00 00 

PET/CBM 

.:033c a5 97 c9 xx d0 fa 00 00 



(This program starts at $033c - 828 
dec. - and will work on all machines, 
since it starts in the cassette buffer. 
Just remember to replace xx with the 
value you want to use.) 

Printing a Message 

Remember two columns back when 
I gave you monitor listings that plac- 
ed a message onto the screen 9 It was 
a long listing and really amounted to 
nothing, since all it was doing was 
POKEing each letter in the message 
to the screen, as if you had said in 
BASIC: POKE 7680, 34: POKE 7681, 
45 . . . etc. It's very inefficient but since 
we only knew how to load and store 
registers, it was all we could really do 
at the time (how would you have felt 
if I had thrown in a few branches 
without explaining what they were 9 
. . .) But now we have learned about 
branches, so we can make a routine 
to print messages using these wonder- 
ful statements. Program 1 is that 
routine. It starts at $033C and outputs 
characters to the screen one at a time 
until it encounters a zero byte. You 
might find it useful. Following is a 
detailed explanation of how it works. 

The message to be printed consists 
of the word "HELLO" and a carriage 
return (ASCII 13), which are placed in- 
to memory along with a zero byte, 
which indicates the end of the 
message. Lines 18 and 19 of the 
disassembly do this, at the same time 
giving the start of the message the 
label MESSGE (as if we were assign- 
ing a string variable in BASIC.) The X- 
register is used as a pointer to the 
next character to be loaded. This is 
achieved with the instruction LDA 
MESSGE.X, which will load the ac- 
cumulator from the address pointed to 
by MESSGE plus the value of the X- 
register. A BEQ then tests to see if the 
value loaded was zero (we don't need 
to do a CMP #$00— remember?), and 
if so, exits the routine by branching to 
the RTS statement (RTS is like saying 
RETURN in BASIC— it ReTurnS you 
from a subroutine). Otherwise, a JSR 
(jump to subroutine, like GOSUB in 
BASIC) is made to a routine in ROM 
at $FFD2 which is present in all Com- 
modore computers and prints the 
ASCII value of the accumulator to the 



screen. So if the accumulator has a 
value of $30, it will print a zero (the 
number zero) to the screen, since 
ASCII $30 (48) is the code for a zero. 
The program will then branch back via 
a BNE (the accumulator doesn't hold 
a zero ($00)) to increase the X-register 
and print the next character if not a 
zero. If you're not quite certain how it 
works, perhaps this BASIC equivalent 
will clarify it for you. It follows the 
machine language routine line for line 
except for the defining of the message, 
which is done in line 1 instead of lines 
18 and 19: 

1 ME$="HELLO" + CHR$(13) + 

CHR$(0) 

9 X = 

10 X = X+1 

11 A$=MID$(ME$,X,1) 

12 IFASC(A$) = 0THEN15 

13 PRINT A$ 

14 GOTO 10 

15 RETURN: REM if called as a 
subroutine. 

PRINT ME$ would be faster and more 
efficient, but I just wanted to show you 
the logic behind the program. 

A Scrolling Routine 

My final program for this month is a 
little routine to scroll the screen one 
position to the left. It will only work on 
the VIC, but you can learn a lot just be 
examining it and trying to figure out 
how it works (just remember the VIC 
has a 22-column screen). If you VIC 
owners want to use it, simply type in 
the BASIC loader program given. 
SYS7168 will scroll the screen one 
position to the left. A line like 

20 FORI=1T022:SYS7168:NEXT 

will scroll the whole screen out of sight. 
The program doesn't need to be left 
at 7168 either. You can put it 
anywhere in free memory without 
changing it by replacing the 
POKE7168 + I.A in line 10 with 
POKExxxx+I.A where XXXX = the 
location you want it in. Just remember 
to SYS to this new location to activate 
it, otherwise the computer could freeze 
up. 

Before explaining a bit of how the 
program works, I have to make a com- 
ment about it: it isn't very efficient. I 
have a better routine to scroll the 
screen, but it uses addition instruc- 
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tions, and since we haven't covered 
these yet, I felt it best to write a pro- 
gram to exclude these. So although 
the routine isn't the best there is, it 
does make good use of the concepts 
we've learned so far. 

Comments 

Basically, what SCROLL LEFT does 
is move each character on a line on 
position left and place a blank in the 
last (22nd) position. It does this for 
every line until it reaches the end of 
screen memory, at which time it 
returns to BASIC. It uses the indirect 
indexed addressing mode to move 
screen memory around. The Y-register 
is the pointer to the next byte to be 
moved, and locations $0 and $1 hold 
the indirect address $1 E00 or $1 F00, 
the two pages of screen memory. It 
has to make several checks to deter- 
mine when it reaches the end of a line, 
and when to leave the program. An in- 
teresting piece of code is found in lines 
35 and 36: 

CLC 

BCC LOOP 
The instruction CLC clears (sets to 0) 
the carry flag. Because the carry is 
now clear, the program is forced to 
branch back to LOOP. It's like saying 
in BASIC C = 0:IFC = 0THENGOTO 
100, or something similar. I just 
thought I'd mention this to you. 

Next Month 

Next month we're going to explore 
the intricate world of mathematical 
functions in assembly language, so be 
sure to pick up the next issue of 

Commander. ~"\ 
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Circle No. 26 





PROGRAM 1 


1 


#.{*#*#*****##**#** 


2 


* PRINT MESSAGE # 


3 
5 


*•*###****#***#*## 




6 


J 


7 


ORG $033C 




; CASSETTE BUFFER 




<828 DEC.) 


8 


.< 


9 


LDX #$FF 




;X«PO INTER 


10 


LOOP I NX 


1.1 


LDA MES8GE,X 




;GET NEXT CHARACTER 


12 


BEQ EXIT 




;IF THEN EXIT 


13 


JSR $FFD2 




; PRINT CHARACTER 


14 


BNE LOOP 




; NEVER ZERO, 




SO GO BACK TO LOOP 


15 


EXIT RTS 


16 


1 


17 


,i 


16 


MES8GE ASC .HELLO. 


19 


BVT 13,0 




; CARRIAGE RETURN 




AND A ZERO 



PROGRAM # 



o -- 



SCROLL LEFT 



10 FORI*0TO57 : READA : POKE? 168+ 1 , A = NEXT 
10(3 DATA169,8, 133,0, 169,30, 133, 1, 160, 

1 , 162, 0, 177, 0, 136, 143, 0, 200, 200, 192, 

1 19 BATA288, 9, 230, 1 , 165, 1 , 201 , 32, 208, 16, 96^ 
232 , 224 , 2 1 , 208 , 23 1 , 1 69 , 32 , 1 36 , 1 45 

120 DATA©, 200, 290, 24, 144,219, 173,0,31, 141, 
255 , 3© , 200 , 232 , 232 , 288 ,218 

RFABV. 

DISASSEMBLY OF PROGRAM #2 

1 *******•+■****'*•** 

2 * SCROLL LEFT * 

3 ***#**.**.***•**** 

4 .; 

5 .: 

6 .: 
7 
8 

10 



ORG $1C08 ; STARTS AT 7168 DEC. 



9 START 



LDA #$00 
STA $00 



11 

12 
13 

14 LOOP 

15 GETCHR 

16 



LDA #$1E 



20 

21 

22 

23 

24 

25 

26 

27 NEXTCO 

28 

29 

38 

31 

32 

33 

34 

35 

36 

37 PAGE 

38 

39 

40 

41 

42 



CPV #$00 

BNE NEXTCO 

INC $01 

LDA $01 

CMP #$28 

BNE PAGE 

RTS 

I NX 

CPX #21 

BNE GETCHR 

LDA #$28 

DEV 

STA C$88), S 

INV 

IMV 

CLC 

BCC LOOP 

LDA $1F08 

STA $1EFF 

INV 

I NX 

I NX 

BNE GETCHR 



;PUT SCREEN ADDRESS 
;$1E00 C7688) 
IN LOCATIONS 
J$0 AND $1 

(IN REV. ORDER) 
STA $81 

LBV #$01 INITIALIZE POINTERS 

LDX #$08 

LDP >;$00>,V;OET FIRST CHARACTER 

DEV 

17 STA <$00) ; STORE IT ONE 

COLUMN BACK 

18 INV 

19 INV 

,*MOVE POINTER TO NEXT 
; CHARACTER 



increment base address 
;to now point to $if©0 

;IS IT NOW $2000? 

;no, goto page 
; return to basic 



;22 COLUMNS? 



.:PUT A BLANK IN THE LAST COLUMN 

;MOVE POINTER TO NEXT LINE 
;CLERR CARRV TO FORCE A RETURN 
;WITH BCC 

;get char 

;AHD STORE IT ONE POSITION BACK 

; INCREMENT pointers appropriately 

JW1LL ALWAVS BRANCH TO GETCHR 



MM 




Living with TOTL. 

LABEL 
2.6 



I traded in my Apple// + on a 
VIC-20. No, this isn't a science fiction 
tale. The story begins nearly two years 
ago when the recession was in full 
bloom. Economic times were tough; I 
was looking for ways to cut costs in our 
department. My primary target for cost 
cutting was a 30-page cross-reference 
list, used by thousands of our dealers 
and salesmen across the country. I 
relied on the list in my daily work, and 
knew it was never up-to-date and not 
too accurate. Once a year the list was 
updated, typed by a secretary, sent to 
the printers and typeset. 15,000 
copies were printed and distributed. 
Each update required hundreds of 
man-hours of research, and the type- 
setting charges were astronomical. I 
could find no reason it needed to be 
typeset. The worst part of this opera- 
tion was that the once-a-year update 
was too infrequent. The list was out- 
dated soon after it was printed. This 
looked like a job for a computer. 



Apple Fever 

After doing a month's research on 
microcomputers and software, I sub- 
mitted a proposal. I could do the en- 
tire job on an Apple// + , print the list 
on a dot matrix printer and deliver 
camera-ready copy to the printers. The 
data would remain on disk and be 
easily updated. I chose Stoneware's 
DB Master as the software to do the 
job. At $250, the Relational Data Base 
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Management System was not cheap 
or easy to learn. I had no program- 
ming skills, but I was willing to learn. 
A year passed and my proposal was 
accepted on a trial basis. We would 
lease the hardware for 6 months for 
$1800. 

I spent two months learning DB 
Master, and setting it up. The first com- 
puter generated list was well received. 
It was up-to-date and legible. The list 
was printed two times in the next four 
months. Each list was more accurate 
than the last. I was having a blast with 
the Apple, learning BASIC and, yes, 
playing some games. At last the lease 
expired, and I was informed the 
$6,000 purchase price for the Apple 
was not in the budget, leaving me 
without a computer. I began with- 
drawal symptoms immediately. 



Capt. Kirk- 
Call the Computer Room 

To my horror, I found I was hooked 
on computing. Days later, as I listlessly 
watched TV, Captain James T. Kirk in- 
troduced me to the "Wonder Com- 
puter of the Eighties." The computer 
junkie in me forced my body off the 
couch and out to the nearest VIC store. 
I gazed longingly at the full-sized 
keyboard, asked questions and read 
the owner's manual. The 22 giant 
characters on each line seemed 
strange, but that didn't prevent me 
from buying my VIC. If it's good 



by Colin F. Thompson 
Santa Monica, CA 

enough for Jim Kirk, it's good enough 
for me. 

In the next two weeks, I emerged 
from my apartment only once. I 
bought a disk drive and returned 
quickly. My two week visit inside the 
VIC revealed one astounding fact: the 
VIC is the technological superior of the 
Apple. If I could find the right software 
for the job, the list could be done on 
my little "Game Machine." I submitted 
a proposal to the company. All I need- 
ed was a good $500 printer. To my 
surprise the proposal was promptly ac- 
cepted. I think others were suffering 
without an up-to-date list also. I bought 
an NEC 8023A printer (with the Com- 
pany's $500) and began the search 
for software. 

Enter the Chicken 

Most software companies I called 
thought I was deranged for attempting 
to use the VIC in the office. I wasted 
nearly two months looking for a 
database manager for the VIC. My 
boss, 3000 miles away, started calling 
me daily, asking when the list would 
be ready. He expected to see results 
sometime during his lifetime. It was 
clearly time to re-evaluate my software 
needs. After carefully laying out the job 
requirements on paper, I got a pleas- 
ant surprise: a database manager was 
not necessary. I needed a list 
manager. List managers are a cross 
between mailing label programs and 
database managers. 






The list consisted of 1100 records 
(printed lines), and seven fields per 
record. Each printed page had a title, 
date, page number, and column 
headings. This kind of job was child's 
play for DB Master, but comparable 
software for the VIC did not exist. My 
previous software search had turned 
up a mailing label program that met 
some of the requirements. It would 
print any number of lines, alphabetic- 
ally sorted, and each line could have 
any number of fields. 

That would be a good start. All I had 
to add was the title, page numbers, 
etc. For a novice programmer, this 
was a monumental project. My call to 
TOTL Software to order the cassette 
based TOTL. LABEL 1 .0 was answer- 
ed by a pleasant woman who turned 
out to be the author, Ann Palmer- 
McCarty. I told her of my plans and 
she thought it could be done by a skill- 
ed programmer. I ordered it anyway. 

Duck Soup 

To get the time I needed to modify 
the program, I tried a bit of misdirec- 
tion. I called the secretaries of each of 
the company officers and offered to 
provide them with all the mailing labels 
they could ever use. They responded 
with a total of about 1000 different 
names. Before I began keying in all 
these labels, my luck took a turn for the 
better. The disk version, TOTL. LABEL 
2.0 arrrived. That speeded up the pro- 
cess considerably. Within two weeks, 
secretaries all over the country were 
getting their labels. At last the NEC 
printer was earning its keep. As a side 
benefit, I was by then, completely 
familiar with the operation of the pro- 
gram. The diversion seemed to work. 
My boss stopped calling when his 
secretary got her labels. 

Breaking and Entering 

I'm never completely satisfied with 
any program I buy. I like to go into a 
program and tinker. By making 
changes to commercial programs, I 
improve my programming skills and 
end up with a more useful program. 
TOTL. LABEL 2.0 (TL) soon became 
my favorite target for making changes. 
My first foray into TL changed the 



screen and character colors and the 
printer's logical file number. (My NEC 
uses LFN 130 instead of the usual 4). 
My next change challenged my 
modest programming skills. I wanted 
to print the same label more than 
once. TL didn't have this option, so I 
broke in and made some changes. 

The secretaries had asked for about 
100 labels of each name. TL printed 
each name in the list once, requiring 
me to print each list 1 00 times. That's 
not very efficient. To solve the problem 
I wrapped a for-next loop around the 
print statement, changed the print 
menu and much to my amazement, it 
worked. After this change was made 
I could ask for 1 00 of each label to be 
printed before TL went on to the next 
label in the list. 

I had convinced the company to 
buy the NEC printer by offering to use 
the VIC to print a large list. The list had 
1 100 lines of data, alphabetically sort- 
ed. Each line was 130 columns wide 
and had seven fields. I began the job 
by defining a label with eight lines: the 
first for alphabetizing, and seven for 
data. My first programming task was 
to make each line of the label print 
AFTER the last, not UNDER the last. 
That was easily done by adding a 
semicolon after the print statement. 
The next job was to separate each field 
so they lined up under a column title. 
The NEC has a Tab function which 
was difficult to understand, but I final- 
ly made it space the fields properly. 
The page title and column headings 
proved to be troublesome, but event- 
ually everything lined up correctly. The 
last hurdle was the tallest. 

I wanted to print 57 lines of data on 
each page, then skip three lines, print 
the column titles and print another 57 
lines. I wrote a complex subroutine to 
count lines, interrupt the print routine, 
check status, change printer codes, 
print the title and page number and 
turn on the coffee pot. It took me three 
months to make the changes and 
another month to enter the data. 



Success 

The VIC generated list turned out to 
be more useful than the Apple version 
because it had an extra 50 columns on 



each line. The added space allowed 
more data and comments. Now that 
I had a program that printed labels 
sideways, I found lots of uses for it. For 
example, I changed our customer file 
into a telephone book. I soon had 
more than 20 versions of the program 
printing different lists. My boss was 
elated; he wasn't too sure that I could 
replace an Apple with a VIC. 

At long last the project was com- 
plete. I benefited from this job in an 
unexpected way. At the start I was a 
novice programmer, and ended up 
with a lot of confidence and now rate 
myself an intermediate level program- 
mer. It was worth the effort. 



Using TOTL.LABEL 

Even though TL can store its files on 
disk, it is not a random access pro- 
gram. It uses sequential files on both 
tape and disk. To change or add a 
label you must load the entire file into 
memory. This is a time consuming 
event. Changes can be made easily 
after the file is loaded, but if there are 
more than 40 or 50 labels in a file, the 
loading time is fairly long. Most other 
operations such as printing or saving 
are rapidly done. My 1 100 line list, for 
example, takes over six hours to load 
and print. For several months, Ann 
kept promising me a faster version. 
Something with some machine lan- 
guage routines to speed up the Load 
and Browse functions. A few weeks 
ago, I was surprised and pleased with 
I opened my mail and found a diskette 
marked TOTL.LABEL 2.1. 



Chickspeed 

TL2.1 has two sections. The M/L 
loader, Chickspeed, is loaded first. It 
stores some M/L routines at the top of 
memory, resets all pointers and auto- 
matically loads the BASIC TL2.1 . The 
entire process takes about one minute. 
Once Chickspeed is in place, it doesn't 
have to be loaded again, unless you 
turn off power to the computer. I did 
some comparison tests matching 2.0 
against 2.1. 

The results were better than I ex- 
pected. For the test I used a label file 
with 100 labels in it. From disk TL2.0 
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loaded it in six minutes, 18 seconds. 
TL2.1 loaded it in 29 seconds. Very im- 
pressive. Printing time was never a 
problem with 2.0, but 2.1 is about 25% 
faster. Both versions have a feature 
called Browse. It allows you to see the 
first line of each label on the screen. 
A number next to each line is used to 
Select a label to be printed, or Display 
the full label. The Browse had been 
painfully slow before. TL2. 1 sped it up 
so that the lines fairly fly onto the 
screen. 

VIC Specs 

TOTL. LABEL 2.1 is quite easy to 
learn. The manual is complete and 
printed with a good quality printer. I 
used the manual for only a few days 
and then never looked at it again. The 
memory requirements are modest, 
considering the power of the program. 
TL2.0 needs 8K and the Chickspeed 
2.1 needs 16K expansion. Labels may 
be printed 1 or 2 wide. If you are a 
registered owner of TL2.0, you may 
upgrade to 2.1 for a small charge. 
Write to TOTL for the details. TOTL of- 
fers a 30-day warranty against defec- 
tive tapes or diskettes. 

C-64 

The C-64 owners who have skimm- 
ed this article looking for information 
on their 40 column wonders should 
begin reading now. TOTL. LABEL is 
available for the C-64 also. As you 



might expect, the 64 version, TL2.6, 
has more features than the VIC. 

The C-64 version allows the RS-232 
user to configure the channel from a 
menu. It also prints multiple copies of 
labels next to each other. Labels can 
be printed up to three wide and there 
is a report format that prints the data 
for each label on one or two lines 
across the page (sideways). This 
would be useful in making lists from 
your data. Both have the machine 
language loader, will print to any 
printer including an RS-232, and will 
do the Commodore to ASCII transla- 
tion. 40/80 column boards can now be 
used and the color variables are eas- 
ily changed to colors that look good 
on your TV or monitor. 

Its low cost and high versatility make 
TOTL. LABEL 2.6 an excellent value, 
whether you use it at home or in the 
office. 

What Else? 

Mailing labels can be stuck on 
things other than envelopes. If your 
printer can expand, condense, 
double-strike or print graphics, you 
can use those features on a label. The 
followng is a list of some of the uses 
I make of labels: Auto maintenance 
tags for oil changes, etc.; Telephone 
number tags for the phone; Office ex- 
tension or comm line numbers; File 
tabs; Return address labels; Property 
tags for equipment; Program titles for 
cassettes and diskettes; Photograph 



ID's for the back of a picture or a photo 
album page; Name tags for luggage. 
If you have a use for mailing labels 
I haven't mentioned, write and let me 
know about it. Send examples. I'll 
assemble a list of the most creative 
uses and print it here in a couple of 
months. Let's hear from you. While 
you are in a letter writing mood, let me 
know if there is a piece of Business or 
Home Management software you 
would like to see reviewed. This is 
really YOUR column. I know how diffi- 
cult it is to buy software without first try- 
ing it. I'll answer all letters. Please in- 
clude a SASE to: Colin F. Thompson, 
BASF Systems Corp., 1307 Colorado 
Avenue, Santa Monica, CA 90404. 

Unfinished Business 

Last month's review of Quick Brown 
Fox raised a point about the View func- 
tion. When Viewing your document on 
a 22 column VIC, QBF scrolls the first 
few lines off the top of the screen. 
Although it's a very minor complaint, 
I asked the manufacturer to look into 
this lapse in an otherwise flawless pro- 
gram. QBF's superb tech support staff 
is still working on my complaint. 

What Next? 

Next month's review will focus on a 
"spreadsheet" program for the 
VIC-20. Of the many spreadsheets on 
the market, I chose Practicalc, from 
Computer Software Associates, to 
make my life a little easier. □ 
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Win A FREE 
Commodore 64™ Computer 

Can You Beat 
PARATROOPER? 

10 Prize Winners 

A New Commodore 64 will be awarded to the person with the highest score. The winning entry 
must contain a photograph of the highest score of the game. 

PARATROOPER ^d^ 

REALISTIC SMOOTH ACTION AND TRUE HI-RES GRAPHICS 




1st Prize 

CBM64 

2nd Prize 

Disk Drive 

3rd Prize 

$200 worth of Software 

4th - 10th Prize 

$100 worth of Software 



JOYSTICK 

OR 
KEYBOARD 



PARATROOPER a High Resolution game that doesn't let you make any mistakes. You 
are in command. Helicopters fill the sky, (and we mean fill the sky!), dropping 
paratroopers. Your mission is to keep 3 paratroopers from hitting the ground on either 
side of your gun. But that's just the beginning. You score by hitting the helicopters or the 
paratroopers, but if you miss a shot it subtracts from your score. Therefore, you must 
make every shot count to make a high score! IT HAS FOUR FAST ACTION LEVELS 
TO CHALLENGE THE BEST PLAYER. The High Resolution graphics helicoptors are 
fantastic. They look exactly like helicopters! The paratroopers are super realistic. Their 
chutes open and then they drift down to earth. If this weren't«enough the sounds are 
fantastic. There are helicopter blades whirring and you can hear the howitzer pumping 
shells. This game really show off the sound and graphic capabilities of you VIC. 
PARATROOPER IS OUR #1 SELLING ARCADE GAME, you've got to see this game to 
believe it. $19.95 

Order your copy today or see your dealer. 
Will you set the top score? 



RULES 



1. All entries must be mailed, as postmarks are required to determine the earliest winning entry. In the 
event ol a tie the postmark will determine the winner. 

2. Deadline for entries is July 31. 1983 

3. Proof ol purchase must be provided. Return your entry with package front and proof of purchase slip I 
and photo. 

4. ENTRIES MUST BE MAILED TO: PARATROOPER CONTEST. P.O. Box 388. Lake Havasu | 
City. AZ 86403 

5. Game contest void where prohibited. 

6. Contest begins April 2, 1983. All entries must be postmarked by July 31. 1963 Contest ends July 31. 
1983 

7. Winners will be notified by mail. Public notice of winners will be printed in this and other computer I 
magazines. 

8. Only one entry per person please — all duplicates will be discarded. 

9. There will be 10 winners for a 1st. 2nd & 3rd prize. Prizes for 4th 10th will be for software. 
10. Contest is limited to U.S.A.. Properties and Canada only. 



ComputerMat . P.O. Box 1664T . Lake Havasu City, Arizona 86403 
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ENTER THE GALACTIC EXPERIENCE 

WITH 




=• 



Galactic 
Software 



the '20 




We wouldn't settle for second best, so why should you? In this day, too many people are com promising quality for price. We feel 
that we have the alternative. Announcing THE MAILING LISTS, the most powerful programs of their kind. 

By being completely menu-driven, these programs are friendly and very easy to use. With each record containing name, address, 
city, state, zip code, telephone number, and several comments, you not only have a complete mailing list but also a small data base 
manager. With capabilities reaching into alphabetizing upon entry, sorting and searching on all fields, printing labels and printing 
complete records, you start to feel the Galactic Experience. 

Currently there are four versions to cover anybodies needs. 



These are: 



The mailing list 
The mailing list 
The mailing list 
The mailing list 
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VIC-2CT 
VIC-2CT 

64 

64 

To order, send check or money order to: 

Galactic Software 

P.O. Box 10516 
San Jose, CA 95157 

or phone (408) 247-4434 for COD 

or 

see your local dealer 
dealer inquiries invited 



tape $25.95 
Disk $27.95 
tape $27.95 
Disk $29.95 



*VIC-20 and 64 are trade marks of Commodore Business Machines, 




Deluxe 

COMSTAR F/T 

PRINTER- $349.00 

The Comstar is an excellent addition to. any 
micro-computer system. (Interfaces are 
available for Apple, VIC-20, Commodore-64, 
Pet, Atari 400 and 800, and Hewlett Packard) At 
only $349. the Comstar gives you print quality 
and features found only on printers costing 
twice as much. Compare these features. 



• BI-DIRECTIONAL PRINTING with a LOGIC 
SEEKING CARRIAGE CONTROL for higher 
through-put In actual text printing. 80 
characters per second. 

• PRINTING VERSATILITY: standard 96 ASCII 
character set plus block graphics and Interna- 
tional scripts. An EPROM character generator 
Includes up to 224 characters. 

• INTERFACE FLEXIBILITY: Centronics Is 
standard. Options Include EIA RS232C, 20mA 
Current Loop. (Add $20.00 for RS232) 

• LONG LIFE PRINT HEAP: 100 million 
character life expectancy. 

• THREE SELECTABLE CHARACTER 
PITCHES: • 10, 12 or 16.5 characters per Inch. 
132 columns maximum. Double-width font also 
Is standard for each character pitch. 

• THREE SELECTABLE LINE SPACINGS: 6, 8 

or 12 lines per Inch. 

• PROGRAMMABLE LINE FEED: program- 
mable length from 1/144 to 2557144 Inches. 



• VERTICAL FORMAT CONTROL: program- 
mable form length up to 127 lines, useful for 
short or over-sized preprinted forms. 

• FRICTION AND TRACTOR FEED: will accept 
single sheet paper. 

• 224 TOTAL CHARACTERS 

• USES STANDARD SIZE PAPER 



if you want more try — 

Premium Quality 

COMSTAR F/T SUPER-10" 

PRINTER - $449 

For $449.00 you get all of the features of the 
Comstar plus 10" carriage, 100 cps, 9 x 9 dot 
matrix with double strike capability for 18 x 18 
dotmatrfx. High resolution bit Image (120 x 144 
dot matrix), underlining, backspacing, 2.3K 
buffer, left and right margin settings, true 
lower descenders, with super and subscripts, 
and prints standard, Italic, Block Graphics, 
special characters, plus 2K oAjser definable 
characters. For the ultimate In price per- 
formance the Comstar F/T Super 10" leads the 
pack) 

WE HAVE THE LOWEST PRICES 

We sell to customers and you save the profit 
margin normally made by computer stores, 
department stores and distributors, we are 
willing to take a smaller margin to develop 
volume. WE LOVE OUR CUSTOMERS - OUR 
PRICES PROVE ITI 



IMMEDIATE REPLACEMENT 
WARRANTY 

If your printer falls because of warranty defect 
within 180 days from the date of purchase you 
simply send your printer to us via United 
Parcel Service prepaid. We will "immediately" 
send you a replacement printer at no charge 
via United Parcel Service prepaid. This warran- 
ty applies to all products we sell because WE 
LOVE OUR CUSTOMERSI 

15 DAY FREE TRIAL 

OTHER OPTIONS 

Extra Ribbons $ 5.95 

Roll Paper Holder 32.95 

Roll Paper 4.95 

5000 Labels 19.95 

1 100 Sheets Fan Fold Paper 13.95 

Add (20.00 shipping, handling and Insurance. 
Illinois residents please add 6% tax. Add 
$40.00 for CANADA, PUERTO RICO, HAWAII, 
ALASKA orders. WE DO NOT EXPORT TO 
OTHER COUNTRIES. Enclose cashiers check, 
money order or personal check. Allow 14 days 
for delivery, 2 to 7 days for phone orders, 1 
day express mall available!! Canada orders 
must be in U.S. dollars. 



ENTERPRIZES <«cto«y.d,r E cd 

BOX 550, BARRINQTON, ILLINOIS 60010 
Phone 312/362-5244 to order 



COMSTAR F/T 

ABCDEFGH a O KLMNDPQRBTUVWXYZ .=» 

ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghiJklmnopqrstuvwMy^i: 

ABCDEFGH ZJKLMNOPOR8T 
ABCDEFGHIJKLMN0PQR8TUVWXYZ 1234567 



SUPER-10" 



L bc:de-F <=ihi Jkl mn 

234567890 

UVWXYZ CrcleNo 34 
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Arithmetic 
at Nursery 
School 



by Dennis G. Smith 
Marshall, Ml 



The VIC's potential in education is 
just beginning to be realized. In many 
ways, it is ideally suited for classroom 
use, especially in the early grades. 
There has been a bandwagon move- 
ment in education to purchase the big- 
ger personal computers. Impressive 
simulation routines and multiple-choice 
of subprograms have convinced some 
school administrators and teachers 
that 32K, 48K, or 64K machines are 
necessary in the school environment. 
While simulations are valuable enrich- 
ment exercises, basic education can 
be packaged in smaller units. The 
VIC's low cost, color and sound 
capabilities, large print for brief and 
easy reading, and 3.5K limitation for 
short loading are ideal features for an 
elementary classroom computer. 

The program offered here was writ- 
ten for my four-year-old daughter, 
Carol, who has been showing the abil- 
ity to retain numerical facts. She, like 
most kids, loves to play with the VIC. 
I am sure, however, that this program 
can easily be used in grades, K-4. 

The program title is "Addition and 
Subtraction Facts." A more appro- 
priate name might be "Ands and 
Take-aways", however. The program 
flashes simple addition and subtrac- 
tion problems onto the screen. It is a 
colorful program and uses arcade 
sounds. If the correct answer is typed, 
then the problem is blown away by a 
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pistol, and a new one replaces it. If the 
wrong answer is typed, the bullet 
misses the problem, and the correct 
answer is given. If ten consecutive 
problems are answered correctly, a 
happy-face message is seen and 
heard. The opportunity to begin again 
is given after a wrong response and 
after ten problems are correctly 
answered. A teacher or parent will 
have to walk a young child through the 
program a few times at first, but my 
daughter can easily use it by herself 
now. As it is listed now, the most diffi- 
cult problems are 9 + 4 = ? and 
9-4 = ?. 

The number of problems given per 
game as well as the problem difficulty 
can easily be changed by editing line 
20. For example, if you redefine the 
variables as follows: 

20 K=15: A=1: B=1 

then only the problems, + 1=?, 
1 + 1 =?, 1 +0 = ?, 1 -0 = ?, 1 -1 =? 
can be displayed; and 15 problems, 
randomly selected from these, must 
be answered correctly to get the hap- 
py face. Answers in this program can- 
not exceed two digits; and therefore, 
the maximum values (A and B) must 
be chosen with this in mind. 

This program was designed to intro- 
duce the youngster to arithmetic prob- 
lems in the equation format. In the 
beginning it is advisable to use the 



simplest problems. If A = 8 and B = 1 , 
then the identity equations and opera- 
tions with unity will be generated for 
whole numbers, 0-8. After these are 
mastered, then increase the value of 
B, so that problems such as 5 + 3 = ? 
and 7-2 = ? can be displayed. The 
problems will remain on the screen un- 
til the child answers; this provides as 
much time as needed to count out the 
answer on fingers or mentally. Even- 
tually the answers will become mostly 
cemented into memory as we have 
them as adults. I omitted the speed 
factor from this program, because my 
daughter showed extreme frustration 
when she was pressured to type in the 
answer quickly. 

For older kids, the program could be 
used for more advanced mental arith- 
metic. For instance, problems such as 
15 + 23 = ? and 62-29 = ? can be 
displayed. A = 50 and B = 49 yield the 
widest range of two-digit problems. 

In my classroom, the seventh- 
graders hardly noticed the difference 
between a game and an educational 
tool. To this teacher, it seems criminal 
not to use kids' fascination with com- 
puters to their own advantage— start- 
ing as soon as possible. 

I will save a copy of this program for 
you. Send $4, a self addressed mailer, 
and a blank cassette to Dennis G. 
Smith, 225 Highfield Road, Marshall, 
Ml 49068. D 
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3 REM + AND - FACTS 

5 V=36S?S: 31=36874 

6 84=36877 : CO=3Q720 

7 SB=36379 : 33=36876 

10 REM fl+E=C OR A~B=C 

11 REM K=# OF PROBLEMSPER GRME 

12 REM fi.B*MflX VALUES 
20 K=10:A=9:B=4 

28 PQKESB,124 

29 PR I NT "[CLEAR]"; 

30 PRINT "[REV] [OF 

F]"; 

31 PRINT" [REV] ADDITION & SUBTRACT I ON [OF 
FT"; 

32 PR I NT "[REV] [OF 
F]"; 

33 PRINT" [REV] FACTS [OF 
F]"; 

34 PRINT" [REV] [OF 
F]" 

35 PRINT" [DOWN] [REV] 3+4=7 [OFF] [REV] 
5-2=3 [OFF]" 

36 PR I NT "[DOWN] [DOWN] [REV]1 + 1=2[0 
FF] [REV] 0+0=0 COFF]" 

37 PRINT" [DOWN] [DOWN] [REV] 1+6=7 [OFF] 

[REV] 3-5=3 [OFF]" 

38 PRINT" [DOWN] [DOWN] [REV] 3-3=8 [OFF 
] [REV] 6-5=1 [OFF]" 

50 PR I NT "[DOWN] [DOWN] PRESS ANV KEY" 

60 GETM*:IFM*=""THEN60 

65 T=190:GOSUE1008 

70 POKESB, 163= PRINT" [BLACK]" 

80 PRINT" [CLEAR] [REV] DESCRIPTIONS 

FF] 

90 PRINT" [DOWN] [DOWN] ANSWER" ;K; "RIGHT 

100 PRINT"IN A ROW AND VOU WIN." 

110 PRINT" [DOWN] [DOWN] MISS A PROBLEM 

AND" 

120 PR I NT "VOU MUST START OVER." 

130 PR I NT "[DOWN] [DOWN] [DOWN] [DOWN] [DOWN 

][ DOWN] [DOWN] [DOWN] [DOWN] PRESS ANV KE 

V" 

140 GETM*:IFM$=""THEN140 

150 PQKESB,222 

155 T=210:GOSUB1000 

159 PR I NT "[CLEAR]" 

160 PR I NT "[DOWN] [DOWN] WHAT KIND OF PROB 
LEM ?" 

170 PRINT" [DOWN] [DOWN] +" 

180 PR I NT "[DOWN] OR" 

190 PRINT" [DOWN] 

200 GETO$ ■■ I FO$= " " THEN200 

210 1 FO$<> " + " ANDO$<> " - " THEN200 

240 IFO$="+"THEN260 



PUT SOME MUSCLE 
IN YOUR 

VIC 20 
16K RAM 
EXPANSION 

$69.90 

8K RAM 
EXPANSION 

$47.70 

•DIRECT FROM 
MANUFACTURER 

•HIGHEST QUALITY 

•LOW PRICE 

•90 DAY WARRANTY 

llll CEMTURy s 



MICRO 



7881 La Riviera Dr. Suite 131 

Sacramento. CA 95826 

Add $2 for snipping & handling 

(California Residents add 6% sales tax) 

DEALER INQUIRES WELCOME 



PET JOYSTICK 
INTERFACE 

• Now any PET® or CBM® 
can use joysticks and game 
paddles. 

• Accepts popular Atari®- 
and Apple®-style 
joysticks/paddles. 

• Sample software provided. 

• Only $69.95! 

Send check, money order, 
VISA/MC (please include exp. 
date) or specify C.O.D. 

J SYSTEMS CORP. 

1 Edmund Place 
Ann Arbor, Ml 48103 
313-662-4714 



VfSA 
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OUR ISOLATORS 

FOR YOUR 
PROTECTION 



Prevents: 

disk drive woes, 

printer interaction, 

memory lose and damage due to lightning 

or AC power line disturbances. 

Commercial Grade Isolator 

ISO-1 3 Isolated Sockets. . . 176.95 

Industrial Grade Isolator 

ISO-3 3 Double 

Isolated Sockets 115.95 




Laboratory Grade Isolator 

200.95 



ISO-17 4 Quad 

Isolated Sockets 



Circuit Breaker 

any model (Add-CB). . . Add 10.00 

Remote Switch 

any model (Add-RS). . . Add 18.00 



W% Electronic Specialists, Inc. 

171 S. Main St., Box 389, Natlck, MA01760 

Toll Free Order Desk 1-800-225-4876 
MasterCard. VISA, American Express 



COMMODORE 64 
OWNERS ONLY 

• SHARE • LEARN • ENJOY • 

• Monthly Newsletter 

• Public Domain Software 

• Reports of Recent 64 Articles 

• Local Chapter Meetings 

• Product Discounts 

• Service Advice 

• Bi-Monthly Magazine 

• Advice on Training 

• Annual Convention 

• Member Bulletin Board 



Send Name, address, 

phone no. and annual 

dues ($25) to: 

The Commodore 64 Users Group 

Suite 100, Corporate West 

4200 Commerce Court 

Lisle, Illinois 60532 

Or Call: 

(312) 369-6525 (Weekdays 
9:00am— 5:00pm— Central Time) 

MASTERCARD OR VISA ACCEPTED 
"An independent not-tor-profll organization". 
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259 PR I NT " C UP 3 1 R I GHT 3CRI GHT ] [ R I GHT ] [ R I G 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
R I GHT ] [ R I GHT ] [ R I GHT ] X " : T=240 

251 GOSUB1000 

252 G0TG265 

260 PR I NT " [ UP ] [ UP ] [ UP ] [ UP ] [ UP ] [ R I GHT ] [ R 
IGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHTS": 
T=24Q 

261 GOSUE1900 
FORN=1TO1000:NEXTN 
T=230 
GO3UB1000 
PR I NT " [ DOWN ] [ DOWN ] [ DOWN ] [ DOWN ] [ DOWN 

] CLOWN] PRESS ANY KEY TO" 
271 PRINT"BEGIN THE PROBLEMS." 
280 GETM* : I FMM " " THEH2S0 

PRINT"! CLEAR]" 

REN GUN 

FGRI=1T012 

REfiBP,Q 

P0KEP,Q 

POKEP+CO..0 

NEXT I 

FORH=1TO1000:NEXTN 

BATA7922, 160.7923. 160.7900,233 



265 
266 

267 
270 






285 
230 

300 

310 
320 
330 
340 
345 
350 
360 
370 
380 
3d 3 



DATA7901 , 160, 7879, 233, 7880, 160 
DATA7857, 95, 7858, 160, 7859, 160 
DflTfl786@, 160,7861, 160,7862, 120 
J=0 



390 

400 

401 
410 
420 
430 
440 



450 



REM PROBLEM 

IFJ=KTHEH700 

N1=INTCRNL<1)*(A+1>> 

N2=INT<RND<1>*<B+1>> 

I F0$= " - " flNDN2>N 1 THEH400 

I FQ$= " - " THENC=N 1 -N2 : GOTO460 

IF0$="+"THENC=N1+N2 

T=240:GOSUB1000 

PR I NT " C HOME ] C DOWN ] C DOWN ] C DOWN ] C DOWN 
] C DOWN ] C DOWN ] C DOWN ] C DOWN ] C R I GHT ] C R I GHT ] 
[Ri3HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 

HT] [right] [RIGHT]" ;Ni;"+";N2;"= ?"; 

455 G0T0463 

460 T=240:GOSUB1000 

46 1 PR I NT " [ HOME ] [ DOWN ] [ DOWN ] [ DOWN ] [ DOWN 
] [DOWN] [DOWN] [DOWN] [DOWN] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] " ; HI ; "-" ; N2; " = ?" ; 

469 PR I NT " [ HOME ] [ DOWN ] [ DOWN ] [ DOWN ] [ DOWN 
] [ DOWN ] [ DOWN ] [ DOWN ] C DOWN ] [ DOWN ] [ DOWN ] [ D 
OWN ] [ DOWN ] [ DOWN ] [ DOWN ] [ DOWN ] [ DOWN ] " 

470 PR I NT "TYPE ANSWER." 
GETT$:IFT$=""THEH490 
IFC<10 THEN 496 
I F VAL C T * ) O I NT ( C/ 1 > THEN5 1 
GETN$:IFN*=""THEN493 



490 
491 
492 
493 
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434 I FC- C 1 0#VflL i T$ > +VRL i H* > > =0THEN60@ 

495 GOTO510 

496 I F VflL < T* y =CTHEH609 
516 REM WRONG 

5 1 5 POKE V ..15: Q=7863 : R=39 

520 FOR I=0T08 

525 P0KEQ+ l,H : POKEQ+ 1 +CG .< : P0K.ES3 , 206-8 

*I 



527 
535 
540 
545 
550 
555 



FORF=1TO30 :HCXTF 

POKEQ+1,32 

IFI»3THEHQ=78S5 

IFI>3THEHQ=Q+22 

NEXT I 

POKES 1 .. 200 = P0KES3, 

FORI=1TO100:NEXTI 
560 POKES 1,0= POKE V,Q 
565 FORF= 1 TO 1 98 = HEXTF 

570 IF0$="-"THEN575 

57 1 PR I NT " C CLEAR ] C DOWN 3 C DOWN 3 [ R I GHT j [ R I 
GHT 3 " ; N 1 ; " + " ; N2 ■> " = " .; C : GOTO580 

575 PR I NT " C CLEAR 3 C DOWN 3 C DOWN 3 C R I GHT 3 C R I 
GHT3"JN1.;"-".;N2;"= ";C 

580 FORF= 1 TO200 : NEXTF 

581 REM MENU 

582 T=240 : GOSUE 1 000 

583 PR I NT " [ DOWN 3 C DOWN 3 C DOWN 3 [ DOWN 3 C DOWN 
3 PRESS -S'' TO BEGIN" 

584 PRINT"flGflIN." 

585 PR I NT "CDOWN 3 [DOWN 3 PRESS 'C TO CHAN 
GE TO", 

586 PRINT"+ OR 

587 PRINT" CDOWN 3 CDOWN 3 PRESS ■"R" TO RUN" 
PR I NT "PROGRAM AGAIN." 
PR I NT "CDOWN 3 CDOWN 3 PRESS 'E' TO END." 
GETM$: IFM$=""THEH590 
I FM*0 " S " RNBM*0 " C " ANDM$<> " R " ANDMf < 

>"E"THEN 590 

592 RESTORE : PR I NT " C CLEAR 3 " 

593 IFMf="S"THEN 309 

594 IFM$="C"THEN160 

595 IFM*«"R"THEN5 

596 GOTO800 
600 REM CORRECT 
610 J=J+1 

630 REM FIRE ' 
640 D=120:POKE\M5 

644 F0RN=1T02 

645 FORX=0TO3 
650 P0KE7863+X.D 
655 P0KE78S3+X+C0,? 
Sm P0KES3 , 200+ 1 5*X 
665 NEXTX 

670 D=32 

671 NEXTN 

675 P0KES4 , 200 : P0KES3 > 
681 FORX=1TO30: NEXTX 



588 
589 
590 
591 




FOR 
PET®, VIC® AND 
COMMODORE 64 

READING MATH SCIENCE 

VOCABULARY METRICS HEALTH 
LANGUAGE ALGEBRA COMPUTER LIT 

SPELLING PHYSICS SOCIAL STUDIES 

TEACHER AIDS CHEMISTRY MUSIC 
PET & VIC are registered 
trademarks ot Commodore Business Machines 



[_] Please send me FREE inlormation about your 
D PET, □ VIC. and □ Commodore 64 programs 

Name 

Address 

City 



State 



16K RAM ieg, aggs NOW'68.00 


Retirement Analysis 


12.95 


Car Maintenance 


12.95 


Loan Calculator 


12.95 


Gold/Silver Trailer 


12.95 


Tax Free Savings 


12.95 


Stock Options 


12.95 


Equity Accelerator |8K) 


19.95 


Landlord (8K) 


19.95 


Insurance Comparison (8 K) 


19.95 


Real Estate Investor (8K) 


19.95 




VIC-20 



6 GREAT PROGRAMS 
ON 1 CASSETTE 

REG. $49.95 f\ f\ gm 

N0W$9i9O 



MC/VISA/MONEY ORDERS/CHECKS/COD 

1000 ITEM CATALOG 

Dealer Inquiries Invited 



Space Shuttle 
Software 

PO BOX 252 
CAPE CANAVERAL, FL 32920 
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DRILEY SOFTWARE 

For Commodore 64™ 

DELUXE ADDRESSER C101F 

Easy mailing labels, each data file holds 
250 addresses. Update, Delete, Add, List. 
Labels, Sort. $40.00Aope. 

HIGH SEAS C204F 

Sail the Atlantic in 1611, recover stolen 
gold, avoid mutiny, bring m wanted 
pirates. $14.95/Tope. 

FUR TRAPPER C205F 

Explore the Rocky Mountains in 1 848, 
gather pelts, trade for food. Lakes, villages, 
ferns. >14.95Aope. 

BLACKJACK TUTOR C210F 

Learn to stand, hit, double, and split. Prac- 
tice scenarios. $14.95/Tope. 

MISSION 64 C215F 

Cirion enemy spacecraft threaten your 
mission. Joystick or Keys. $l9.95/Tope. 

i 1 * 

Add shipping of $.75 per cassette tape. 
(Dealers: (816) 763-2001 for sales rep.) 
• All programs con be used on disk, too • 

P.O. DOX 2910 
LIVEKMORE, CA 94550-0291 
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PROCR€XTIV€ 
P€RIRH€RQL-T 
6/OfTWPIR€ 



THE AUTO CLOCK' 



A TRUE MULTI-FUNCTION CARD 

• Switch your VIC-20/64 or other AC devices on 
and off under software control 

• 256 year clock/calendar. 

• 2K CMOS battery backed up RAM. 

• Menu driven software. 

• Plugs into the buss expansion slot. 

• Cartridge style case. 

• 19 user accessible subroutines 

• 20 page illustrated manual with detailed 
programming examples 

AUTO CLOCK $129.95 



• State of the art Pro-Adventure Series for the 
Commodore 64. 

• Realistic sound effects and animated color 
graphics. 

• Over eighty areas. 70 objects, and 40 
commands. 

• A "real-time adventure with a user-fnendly 
help feature, updated constantly 

• Comprehensive, illustrated manual with a 
fold-out map. 

• Your success in Gothmog's Lair will depend on 
your skill and resourcefulness. NOT on pure luck. 

• Prepare for the most challenging adventure 
you will ever undertake as you enter 

GOTHMOG'S LAIR cassette version — $39 95 

diskette version — $39.95 



DEALER INQUIRIES INVITED 
ORDER FROM: 

PROGRESSIVE PERIPHERALS & SOFTWARE 
6340 West Mississippi Avenue 
Lakewood. Colorado 80226 
(303) 778-1312 



632 PR I NT " [ HOME 3 C DOWN ] C DOWN 3 C DOWN ] C DOWN 
3 C DOWN 3 CDQWN 3 C DOWN 3 C DOWN ] C R I GMT 3 C R I GHT 3 
[RIGHT3 [RIGHT] [RIGHT] [RIGHT] [RIGHT3 [RIG 
HT 3 C R I GHT 3 t R I GHT 3 1 ~0 1 A I -~\ I ~" 

633 FORX=1TO30:NEXTX 

684 PR I HT " C HOME 3 C DOWN 3 C DOWN 3 [ DOWN 3 E DOWN 
3 C DOWN 3 C DOWN 3 [ DOWN 3 [ DOWN 3 1 R I GHT 3 C R I GHT 3 
[RIGHT! [RIGHT] [RIGHT] CRIGHT3 [RIGHT] CRIG 
HT 3 [ R I GHT 3 [ R I GHT 3 \ I X J L XVS I I/" 

685 FORX=1TO30:NEXTX 

686 PR I HT " [ HOME 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 
3 [ DOWN 3 [ DOWN 3 [ DOWN ] [ DOWN 3 [ R I GHT 3 [ R I GHT 3 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT][ RIGHT] [RIGHT] 

POKES4,0: POKEY, 

FORN=1TO200:NEXTH 

GOTO400 

REM K CORRECT 

POKEY, 15 :P0KES3, 230 

FORF=1TO400:NEXTF 

PDKES3,245 

FORF=1TO400:NEXTF 



POKES3,0 



695 

696 

700 

705 
710 
715 
728 
725 

726 PR I NT " [ CLEfiR ] [ DOWN ] [ DOWN ] [ DOWN ] [ R I G 
HT] [RIGHT] [RIGHT] [RIGHT]G00D ! " 

727 PR I NT " [ DOWN ] [ DOWN ] [ DOWN ] YOU ANSWERS 
D"; J; "RIGHT" 

728 PRINT" IN A ROW." 
F0RF=1T020 

POKER ^ Q : P0KEP+C0, '• P0KES3, 200+2*F 
NEXT F 

DATR7953 , 78 , 7954 , 3S , 7955 , 99 , 7956 , 99 
D AT A7957 , 77 , 7974 , 78 , 798© , 77 , 7996 , 1 



730 

735 

748 

745 

750 

751 

1 

752 

01 

753 

,77 

754 

8 

760 

765 



DRTR7998, 31 , 8000, 81 , 8002, 103, 8018, 1 
DATA8824, 103,8048, 191, 8046, 103, 8062 



DHTfi«064, 



77.. 



3065 , 1 00 , 8066 , 78 , 8068 , 7 



PGKES3,0:POKEV,0 

PR INT* [ HOME ] [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 
3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ D 
OWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 
3 [DOWN] [D0WN3 [D0WN3 [RIGHT3 [RIGHT3 [RIGHT 
3PRE3S ANY KEY." 
770 GETM* : I FM*= " " THEN770 

774 PR I NT "[CLEAR 3" 

775 GOTO 581 
808 END 

1 000 POKEY ,15: PQKES3 , T 

1001 FORI*1TO50:NEXTI 

1002 POKEY, 0:POKES3,O 

1003 RETURN 



READY. 



" 
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LASER COMMAND by Bob Burnett 




HOPPER by Thomas Kim 
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You are the commander of a squadron 
of laser ships. It is your duty to defend 
the cities of Earth against the alien 
onslaught. Spectacular graphics and 
machine code for super fast arcade 
fun. VIC-20 and cassette, joystick. 
$20.00 



SHIFTY (c)by Kavan 



*T 



Watch the maze change 
as you pass thru the 
revolving doors. This is 
a really cute one. 
Machine language. VIC- 
20 w/8K expander, cas- 
sette. Joystick and 
keyboard. 
$20.00 



One of the most popular games in Europe. You 
control BONZO as he climbs the ladders and 
picks up point blocks. Watch out for the alien 
guards. Excellent graphics & sound. 100% 
machine code. VIC-20 w/8K expander, cassette. 
Joystick or keyboard. 
$20.00 



Rated a Five Star game by Creative 
Computing. Avoid the cars, buildings, 
logs and other obstacles to bring the 
frog home. Machine language. VIC-20, 
cassette and joystick. 
$20.00 



SPACE TRADER 

by Doug Caruthers 



Search for the lost 
planet of Alantia. 1 to 4 
players. Text adventure. 
VIC-20 w/16K expander 
and cassette. 
$39.95 




Many exciting titles to choose from. 
New Software for the CBM B500/700 series available now !! 



PAL 20 



$10.00 




• 95 pages of aids, worksheets & logs 

• Something for every VIC-20 programmer 

• Coming soon for the Commodore 64 



NEW for the VIC-20 & 64 

electronic ab VIC-20 products 

VIC FORTH $59.95 

This is a highly capable language that operates from cartridge. It is based on 
Fig-Forth. Disk and cassette compatible. Vic Forth will work with any memory 
expansion. 3K of RAM is included in this cartridge. 

VIC GRAPH $49.95 

The intention of this program is to serve as a mathematical and pedagogic aid 
for studying complicated equations and functions by their graphs. Plots 
graphics in high resolution within an x-axis range defined by you. You can also 
"blow up" parts of a graph in detail by a specified range. 

VIC STAT $49.95 

Vic Stat is a cartridge which will simplify your work with statistics and graphic 
displays. It will add approximately 15 commands to BASIC. For example, bar 
chart, horizontal or vertical, plotting with 2024 points, printout of screen. 
Statistical commands for calculations of, for example, mean value, standard 
deviation, variance, etc. 

VIC REL $59.95 

The purpose of this cartridge is to simplify control of, for example, burglar 
alarms, garage doors, door locks, heating elements, lamps, radios, remote 
controllers, valves, pumps, telephones, accumulators, irrigation systems, 
electrical tools, stop watches, ventilators, humidifiers, etc., etc. This cartridge 
contains 6 relay outputs and 2 inputs of type optocoupler. For the VIC-20 and 
Commodore 64. 



SEE YOUR LOCAL DEALER TO SEE OUR FINE PRODUCTS 

Dealer inquiries invited Software Distribution Available Programs wanted 



(714) 
778-5455 



Data Equipment Supply Corp. 
8315 Firestone Blvd., Downey, CA 90241 



(213) 
923-9361 



VIC-20", COMMODORE'*, COMMODORE 64 th , and CBM'* are trademarks of Commodore Business Machines, Inc. 
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by Tim Parker 
Ontario, Canada 



This series is being written in 
response to a large number of com- 
ments about the programs appearing 
in this (and other) magazines: namely 
that they seem to be total gibberish to 
many readers. A large number of 
writers tend to assume that most 
readers will have a sufficient aquain- 
tance with BASIC and any machine's 
quirks that are required to get the most 
out of an article. I confess that I am 
probably one of the worst offenders. 
I hardly ever document my programs, 
as they all seem so simple to me. Alas, 
a mistake if ever there was one! 

In the next few issues, I hope to take 
a quick yet thorough tour through 
BASIC as a language specifically ap- 
plied to Commodore machines, then 
go into a few operation details on the 
different machines such as the VIC-20, 
VIC-64, the PETs and CBM machines. 

At this point, though, I will begin at 
the beginning. I hope veteran users, 
and those who will quickly become 
veterans, will not be too bored by the 
following, but it is always best to begin 
at the beginning. 

BASIC is an acronym for Beginners 
All-Purpose Symbolic Instruction 
Code. That really doesn't tell anyone 
much. When deciphered, and the in- 
tent of BASIC is included, it boils down 
to the following. A general purpose 
language applicable to most program- 
ming situations was sorely needed that 
didn't require a degree in computer 
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science to learn. The obvious ap- 
proach was to relate functions to their 
everyday English meaning. A PRINT 
statement should print something, 
while a STOP statement should halt 
operations. Naturally, some definitions 
had to be created. These were done 
with the most logical approach possi- 
ble that still retained some sensible 
meaning. 

BASIC quickly grew in popularity, 
and was refined in complexity and 
ability to the state it now exists in. Al- 
though several different BASICs have 
been created, most with common 
features, there is no set standard to be 
adhered to. A de facto standard was 
approached by the massive adoption 
of a BASIC version by Microsoft. It 
quickly became universal in its use, on 
almost every machine imaginable. 
Thereafter, most BASIC'S have been 
patterned on Microsoft's lead. 

To learn BASIC requires only a com- 
puter and a well written manual. There 
are dozens of BASIC instruction books 
on the market, and most are well writ- 
ten. Some, unfortunately, are not. The 
only way to learn a language is to write 
programs in it. That is why a book is 
so useful. Examples are usually given 
of all functions, and most popular 
books approach BASIC in a tiered 
level, introducing the complexity levels 
one by one. There is no point in 
repeating the BASIC instruction books 
here. To do so would require over a 



year's worth of articles. So a neophyte 
BASIC user should rush out and 
browse through the local bookstore or 
library's shelves. Find a book that is 
easy to read, and appears to be writ- 
ten in a competent manner. Avoid the 
"cutesy" books. They tend to slow you 
down, rather than help. 

Several things require pointing out. 
First is that for all Commodore com- 
puters (in fact, for any computer that 
doesn't compile the program) line 
numbers must be used. Each line of 
instruction code has to be prefaced by 
a number that is usually less than 
65,536. It doesn't matter what order 
the lines are written in, as the BASIC 
interpreter will arrange them in as- 
cending order. Remember that they 
will be executed in order, though. It 
also doesn't matter what number you 
start with, or what interval you use be- 
tween line numbers. There are a cou- 
ple of considerations to this, though. 
Inevitably, you will want to add lines 
in between the existing lines. 
Therefore, leave enough line numbers 
free between each line for expansion. 
Also, it is nice to be able to structure 
your programs to an extent, so that 
specific line numbers do specific jobs. 
If subroutines are included (if you don't 
understand what a subroutine is, don't 
worry) it is convenient to give them a 
numerical sequence to themselves. 

Examine a few published programs, 
and see if they follow the above 
guidelines. Personally, I usually leave 
ten lines between each line number for 
expansion (i.e. I increment by ten: 
210, 220, etc.) because ten is a con- 
venient number, and it is easy to count 
by tens! When starting a program, I'll 
usually begin at one hundred or so, as 
I will probably want to add some in- 
structions or definitions at the top of the 
program. Subroutines, if they are ma- 
jor (such as Klingon ships moving, or 
pirates attacking), will be done in 
blocks of thousands. As an example, 
if a Trek game is in the works (See 
Commander, January), the different 
functions such as moving, firing, com- 
puters, etc, will be at 1000's, 2000's, 
3000's, etc. This allows fast access to 
the required routine, and helps a pro- 
grammer "remember" where he did 
this or that. 



Most BASICs allow multiple com- 
mands per line. By this I mean that 
more than one instruction can be 
given per line number, as long as they 
are separated by a colon. (This is a 
technique to save memory. ..more on 
that in another column.) While it may 
be easy to type many commands on 
one line, for many applications, it is not 
too good an idea. Usually, program- 
mers will do functions such as INPUTs 
and response analysis on separate 
lines, although to "compartmentalize" 
the program, they can be combined. 

One big feature that should be includ- 
ed in every program, but seldom is, is 
documentation. Judicious use of the 
REM (remark) statement will help in 
later analysis and error fixing. This is 
great advice, but no one ever follows 
it (especially me)! I have had several 
cases where I have written programs 
for specific tasks, such as games, 
calculations, sorts, etc. and they have 
worked perfectly. They are then stored 
on a shelf for a few months to gather 
dust. At some point later, I'll dig it out 
and attempt to modify it, but complete- 
ly forget what each variable does, or 
why that loop is there, or what that 
cryptic GOSUB is doing. Usually, I 
spend more time analyzing the pro- 
gram than I saved in the first place. 
(Several times I have found it easier to 
rewrite the whole thing!) The moral is 
that documentation will save 
headaches and lot of hassle in the 
future. It doesn't have to be elaborate. 
Just stick in a REM that says what 
each variable does, and one at the 
start of a loop or subroutine that ex- 
plains its purpose. 

While mentioning variable names, 
it's a good idea to mention that in the 
same sense that documentation can 
help your programming, variable 
names can do the same. Try to use a 
name that is somewhat indicative of its 
purpose. Most BASICs on the Com- 
modore machines only recognize two 
characters at the beginning of the 
variable. It is difficult to give a descrip- 
tive label in two letters, but it beats us- 
ing X's and Y's all over the place! 
Remember also that variables can be 
"reused" to save memory. If a loop at 
the top used variable X1 as a counter, 
and that is its only use, when another 



loop occurs, use the same variable. 
Each variable named requires 
memory space. 

Ensure that the variable types are 
known. With Commodore BASIC ver- 
sions, this is not a difficult task. Most 
character variables (those that are not 
just numbers) must have a dollar sign 
tagged on the end to identify itself. 
Some BASICs require other identifiers, 
too. 

Begin programming with the "easy" 
commands until their use is determin- 
ed. Granted, there are only so many 
things that can be done with PRINT, 
INPUT, and GOTO, but there is no 
point in using the commands such as 
LEFTS, CHR$, etc. if the basics are not 
mastered. This may seem obvious, but 
appears to be the major downfall of 
most programmers at the early stage. 

For those who are eager to get on 
without, and don't want to waste time 
reading book after book of theory, use 
the instruction manual that came with 
your computer. Most come with an ex- 
planation of BASIC. Write a specific 
program, not one of their trivial ex- 
amples (although do read their ex- 
amples to see how it's done). Design 
a program that you see as a challenge 
to your programming skills at that 
point. The satisfaction gained by 
finishing the task is tremendous, and 
will aspire you to greater heights! 

At this point, some definitions can be 
introduced for future use. First, the dif- 
ference between interpretive and com- 
piled languages should be under- 
stood. An interpretive BASIC uses an 
"interpreter" routine to decipher any 
code you may have written. For exam- 
ple, the instruction PRINT "TEST" 



o 

CO 



means absolutely nothing to the com- 
puter as it stands. The interpreter has 
to read the above, and realize that it 
is telling the computer to send to the 
screen the word TEST. The interpreter 
is exactly that. It understands what you 
say in one language, and translates it 
to a language the computer can 
understand. (That is why when a pro- 
grammer writes in a language the 
machine understands directly, it is call- 
ed machine language programming.) 
The interpreter is usually a pretty big 
program, which itself is written in 
machine code. All that just to make 
your programming easier! 

A compiled language takes the in- 
structions you write, and like an inter- 
preter, changes it all to machine code. 
The difference is, the program is 
changed to code, and can be saved 
on storage media as a machine code 
program. An interpreter requires that 
it interprets every time through. Ob- 
viously, a compiled language will be 
much quicker, as it doesn't have to go 
through the translation step. It also has 
several problems, in that if a minor 
change is made to a program, it has 
to be recompiled. Compilation itself is 
a longish project. 

The major fault to compiled pro- 
grams is that they cannot easily be 
debugged. With interpretive BASICs, 
if a line is not behaving correctly, you 
simply change the line and RUN the 
program again. With a compiled pro- 
gram, the source code has to be 
reloaded, changed, and compiled. 

Enough for this month. In the next 
installment, a look at some of the more 
advanced features of BASIC, and how 
they can best be applied.- . : 
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*4tvA • DISK-O-MATE 



(Write (or Price) 
A must for 20404040 disk owners. Write protect indicators 
switches, power indicator and error beeper 

•"Real World" SOFTWARE m. S25 , 

Word Processor Mailing List Catalog Ham Radio Frequency Counter 



r -"OLD" 8K PETs- 



| • 2114-TO-6550RAM ADAPTER |S i2-s2si 

| Replace 6550 RAMs with low cosi 21 Ms Hundreds Sold' 

• 4K MEMORY EXPANSION isie-se*) 

Low cos! memory expansion using 2 1 Ms lor bigger program 




OPTIMIZED DATA SYSTEMS 

Dept.O- PO. Box 595 ■ Placentia. CA 92670 

DISK OMATE liixiemark Opt>m.zv<t Djrj System* P£T C8M irademdrh Commodore 
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C-64 TI99/4ATIMEX VIC 20 ATARI 



CHILD 

DEVELOPMENT 

SERIES 

(for the 3.5K VIC and 
16K ATARI) 

ADD/SUB— $16.95 

Displays single or multiple 

digits with or w/o pictures, 

borrows, carries, scoring, 

and audio/video feedback. 

NUMER-BECi— $16.95 

Number recognition, object 

counting, object grouping, 

and number/size/shape 

discrimination. 




:4 



BECi is composed of professionals dedicated to 

providing non-trivial educational materials for the home 

computer. In addition to our own software, we carry a full 

line of evaluated hardware and software. Send $2 

(refundable) for our catalog. 



Send check or money order to: 
BOSTON EDUCATIONAL COMPUTING, INC. 

78 Dartmouth Street, Boston, MA 02116 
(617) 536-5116 * MA res. add 5% tax 

See Us At THE EAST COAST COMPUTER FAIR 
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VIC-20 .„« CBM 64 

EXPANDER BDARD5 




4 Slot for the 64. Toggle switches and 
reset switch. 

P/N C64 *69.95 



PTI offers the finest selection 
of expander boards available 
for the VIC-20 and CBM 64. 
The design features, quality 
construction, and competitive 
prices make any of them an 
exceptional value. New pro- 
ducts are being added monthly, 
so write for complete catalog. 





6 Slot for the VIC. Toggle switches 

and reset switch. 

P/N V36 s 79.95 



Slot for the VIC, No switches, reset, or 

fuse. 

P/N V13 s 49.95 





4 Slot tor the VIC. Toggle switches and 
reset switch 

P/N V24 *69.95 



PRECISION TECHNOLOGY, INC. 
COMPUTER PRODUCTS DIVISION 



SALT LAKE CITY. UTAH 
(801) 487-6266 



3 Slot for the Vic. Slide switches, no 
reset switch. 

P/N V23 s 59.95 

See your dealer, or place 
your order direct 

VISA-M/C-CHECK-COD 
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BRINGS YOU THESE NEW ITEMS! 



5 1 />" FLOPPY DISCS, Boxes of 10, Guaranteed 
5 yrs. 12MM Passes. . . SS, SD $20.30/SS,DD 
$23.10/DS DP $27.30 

C-10 Blank Cassette Tapes, Case of 50, 
screw-pac Commercial Grade. . , $25.00 

The TAPEWORM™ the Amazing Cassette 
Recorder interface for all COMMODORE™ 
Products. . . $24.95 

COMPUTER FURNITURE, All styles and sizes 



Ask for our catalog 



^COMPUTERS 



SPEECH SYNTHESIZER • by METAVOX™ for 
Vic-20™ and COMMODORE™ 64. . . $168.00 

BACK ISSUES • COMPUTE! Magazine • 5 Issue 
minimum, $2.50 per issue, specify month 

A/V Interface for COMMODORE™ 64. . . $19.95 

VISA, MASTERCHARGE, No COD's 

Prices exclude delivery costraiiow 30 days delivery) 

Dealer Inauiries Invited 

1125 N.E. 82nd 

Portland, OR 97220, (503) 257-9464 
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Machine Language I/O: 
Part Two of Three 



In my last article on machine lan- 
guage I/O, we discussed two aspects 
of this somewhat difficult and undocu- 
mented subject. The first part dealt 
with a machine language input routine 
and the second with a method to open 
files on the disk drive. The article was 
accompanied by two small sample 
programs. This article will side step a 
little bit from what seems the logical 
pattern of the total concept that I am 
trying to get across. It will all come 
together as mentioned in part one of 
the article, when we get to part three. 
If you have not read part one, I recom- 
mend that you do if you want to follow 
the flow and understand the routines 
that I am piecing together. If you have 
just joined in and wish to start from 
here, I am sure that it will present no 
problem as this section should be able 
to stand on its own. 

I would like to briefly explain the 
routines that will be used in our two 
sample programs. The two programs 
will be a small PET to PET terminal pro- 
gram for the IEEE modem followed by 
another terminal program that will con- 
verse in ASCII to any other computer 
or mainframe. I will go through the 
routines in the order that they appear 
in the first program listing. Note: Both 
programs use the same routines. 
The Routines 

OPENI— This routine is often refer- 
red to as SET INPUT DEVICE. The X 
register holds the logical file number 
of the open file. This will make the IEEE 
device the talker and BASIC 4 will 
clear DS$ and ST. The three errors that 
may occur are: FILE NOT OPEN, NOT 
INPUT FILE or DEVICE NOT PRES- 
ENT. 

Status 

This is the status byte that ST is com- 
puted from. Most of us use it in our 



by Howard N. Rotenberg 
Toronto, Canada 

BASIC programs to detect different I/O 
conditions. The possible values are: 

1) 1 —for Timeout on Write when the 
IEEE bus is the listener. 

2) 2— for Timeout on Read when the 
IEEE bus is the talker. 

3) 4— for a short block on a cassette 
read, verify or load. 

4) 8— for a long block on a cassette 
read, verify or load. 

5) 16— for an Unrecoverable Read 
Error on cassette read or Any mis- 
match on a tape verify or load. 

6) 32— for a checksum error on a 
cassette read, verify or load. 

7) 64— for End of File marker. 

8) 1 28— for end of tape on cassette 
read, verify or load and Device not 
present on the IEEE bus. 

WRITE— This is the same routine 
called by a BASIC print or print#. It is 
used to output the contents of the 
accumulator to any device specified. 
The values of A, X and Y are not 
changed. 

GETCHR— This will take the one 
character from the keyboard input buf- 
fer. The values of X and Y are not 
changed. 

OPENO— This routine is often 
refered to as Set Output Device. The 
X register holds the logical file number 
and the IEEE device becomes a 
listener. 

CLEAR— This will clear open chan- 
nels to the IEEE bus. Before calling this 
routine, the file number should be held 
in the X register. 

OPEN— This routine is identical to 
the BASIC open. The memory loca- 
tions $D1 -$D4 must be previously set 
up. These locations will be discussed 
shortly. 

CLOSE— This routine follows the 
same rules as the BASIC open state- 



ment with the exception that the loca- 
tion $D1 is of no consequence. 

DFAULT— This routine will set the 
computer back to its default devices 
as on power up. The screen (device 
3) is made the output device and the 
keyboard (device 0) is set to the input 
device. Any output device on the IEEE 
bus is UNLISTED and any input 
device is sent the UNTALK command. 
This routine does not affect the X and 
Y registers nor does it close any open 
files. 

TALK— This routine will set the 
desired device to be the talker. EG. If 
you print the listing to your printer, 
the printer is called the listener while 
your computer is the talker. If you are 
spooling then your disk drive will have 
been set to be the talker. 

LISTEN— This routine sets the 
desired device to be the listener. The 
previous example covers this subrou- 
tine also. 

UNTALK and LISTEN-I will just 
briefly say that these two commands 
are the opposite of their counterparts 
previously covered. The actual rou- 
tines used along with the registers and 
the IEEE bus lines are a bit compli- 
cated to cover at this time. 

GETIEE— This routine will set one 
character from the IEEE bus and re- 
turn it in the accumulator. It must return 
a character within 64 milliseconds or 
ST will be set to 2 indicating a timeout. 

CHKSTP— This simply checks for 
the stop key and returns a if it was 
pressed. 

The only locations that we will use 
in the program that I have not mention- 
ed in the above routines are $D1 to 
$D4. The location $D1 must contain 
the number of characters in the file 
number. We will use a in our exam- 
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pie since we will be opening a file to 
a modem that needs no file name. Just 
the same, the location must be set. 
The location $D2 must contain the cur- 
rent logical file number thgt we are 
about to open. The last two locations, 
$D3 and $D4, must contain the cur- 
rent secondary address or the R/W 
command and the current device 
number respectively. Since we are not 
using a secondary address, we will set 
$D3 to 255 and $D4 to our device 
number which happens to be 5. 

This covers most of the information 
that will be of importance to the work- 
ings of the sample programs, so with 
this under our belt, we will carry on 
with the workings of the programs. 

Programs 

The program that we will mainly 
discuss will be Program 1 . This is the 
PET to PET terminal program. The se- 
cond program is almost identical with 
the exception of two additional 
routines that are used to translate from 
PET ASCII to ASCII and VICA-VERSA. 
I will discuss those routines after we 
are finished with the main topic. 

The constants are declared at the 
beginning, followed by the load ad- 
dress which happens to be $9000 or 
decimal 36864. This may of course be 
changed at the user's discretion. 

The first thing we must do is to open 
the files we are going to use. In this 
case we will be opening a file to an 
IEEE modem with a device number of 
five. We will also use five as the logical 
file number to open with. As stated 
earlier, we will store the logical file 
number and device number in the 
memory locations $D2 and $D4 re- 
spectively. Since we are using no file 
name, we store a zero for the number 
of characters in the file name in $D1 . 
Lastly, after storing 255 into memory 
location $D3, indicating no secondary 
address, we are ready to jump to the 
subroutine OPEN. 

The file to the modem is now open 
providing we did not get any of the 
possible errors that were mentioned 
earlier. The main body of the program 
is a series of seven instructions that will 
call the appropriate subroutines for our 
program. I will use these instructions 



for our guideline. 

The first thing we do is JSR to a 
subroutine called RECV. This routine 
is used to get one character from the 
modem and display it. The beginning 
of RECV saves the contents of the ac- 
cumulator since other routines also 
use it. We send a talk command to the 
modem to inform it that it will be the 
device to send us any information it 
has in its buffer. We must open the 
modem for input since we want it to 
get any character that may come over 
the telephone line. When we open it 
for input, we must use the X register 
for the file number. Considering that 
the modem is now open for input, we 
may restore our accumulator. We then 
use the subroutine GETIEE to get a 
character from the modem buffer if 
one exists. At this point we check the 
status and if it is not equal to zero then 
we skip the instruction to display the 
character. If the status was zero then 
there was a valid character to display 
and we do so. Before going back to 
our main routine, we must clear the 
channel and tell the modem that it is 
no longer a talker. The X register, 
which still contains our file number, is 
used for these subroutines. 

This takes us back to our main pro- 
gram which will not check for the 
depression of the stop key. If it was 
pressed, we branch to QUIT to end 
the program. I will discuss QUIT after 
the rest of the program. 

We now JSR to GETCHR which will 
look at our keyboard buffer to see if we 
have entered any characters. If there 
is nothing there, it branches back to 
MAIN and goes back to check the 
modem again. If it fails the test then we 
must have entered some character so 
the program will go to the subroutine 
called XMIT. 

This routine once again starts off by 
saving the contents of the accumulator 
on the stack since it now contains the 
character we want to transmit. The 
modem is sent the listen command 
since it will be receiving our character. 
It is now opened for output, once 
again using the X register since it will 
be transmitting the character. After the 
open, we may restore our accumula- 



tor's contents to get ready to send our 
character. We use the JSR WRITE that 
now acts just like a BASIC print#5. As 
you can see from this that a single 
subroutine may be used to send a 
character to whatever device we want 
by defining what the output device is 
to be. We then send a clear command 
just as before to clear the channel fol- 
lowed by an unlisten to cancel our 
listen command. One difference here 
is that we use the subroutine DFAULT 
to restore our default devices. I.E. 
Keyboard as input and Display as 
output. 

At this point, we return to our mam 
program and continue until the 
stop key is pressed. We will now 
assume that the stop key has been 
pressed and causes the branch to 
QUIT, which will get us back to BASIC 
after a little cleanup. All we have to do 
now is clear the channels we have 
been using and close any files that we 
may have opened. Since we only used 
one, this job is quite brief. It is impor- 
tant to notice that the X register has 
been used to clear the channel and 
the accumulator has been used to 
close the file. This is a must for a good 
close and clean exit from the program. 
ASCII Program 

The second part of this article just 
makes the first terminal program more 
flexible. It deals with the second pro- 
gram which is nearly a carbon copy 
of the first as far as the main routines 
are concerned- The big difference is 
that this program may be used as an 
ASCII terminal program which will 
enable you to converse with almost 
any other computer. 

There are two additional subroutines 
that do all the work for us. These are 
called TOASC and FASCII. Their pur- 
pose is to take the Commodore's 
character set and translate it to the 
standard form of codes used by most 
other systems. There are a few dif- 
ferent ways to do this conversion. One 
of the fastest would be to construct a 
table of the character codes to con- 
vert. This would, however, take up 
more memory. I chose to calculate the 
value of the proper character for 
transmission or reception. This is 
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similar to the way you would reverse 
upper and lower case characters in 
BASIC. 

The routine FASCII is called from the 
receiving subroutine if there was a 
character received. This will convert 
the ASCII character received into the 
Commodore character set before dis- 
playing it. The other routine TOASC is 
called by the main program if there is 
a character in the keyboard buffer to 
send. This will ensure that the transla- 
tion will be done before sending it. I 



choose not to explain the routines that 
convert since I hope that the com- 
ments will be sufficient. It is also not 
really an I/O operation and I would like 
to stay within that capacity in these 
articles. 

Upgrade Basic Anyone? 

The subroutines that I have used in 
the terminal programs are for BASIC 
4. If you are still using UPGRADE 
BASIC, then the substitutions should 
be made. (See BASIC Upgrade box.) 
Note: The stars represent no change. 





Subroutine Substitutions 




OPENI 


$F7AF 


$F770 




STATUS 


$96 


$96 


* 


WRITE 


$FFD2 


$FFD2 


* 


GETCHR 


$FFE4 


$FFE4 


* 


OPENO 


$F7FE 


$F7BC 




CLEAR 


$F2A6 


$F272 




OPEN 


$F563 


$F524 




CLOSE 


$F2E2 


$F2AE 




DFAULT 


$FFCC 


$FFCC 


* 


TALK 


$F0D2 


$F0B6 




UNTALK 


$F1AE 


$F17F 




LISTEN 


$F0D5 


$F0BA 




UNLISN 


$F1B9 


$F183 




GETIEE 


$F1C0 


$F18C 




CHKSTP 


$F335 


$F301 





Conclusion 

This takes us to the end of part two. 
In the last part, we will bring everything 
together and hopefully all questions 



will be answered. Once again, I would 
like to say that all listings have been 
assembled using COMMODORE'S 
assembler. 



COMMODORE 64 
andVIC-20" 



(VIC requires 16K expansion) 
* EXCITING ADVENTURES * 

EERIE MANSION-Explorethe 

mansion and find the treasures but 
beware the dangers. 19 95 tape 24 95 disk 

" FUN GAMES " 

MONOPOLY - Sound and 
graphics make this family favorite 
more fun than ever. 64 only — 
19 95 tape 24 9i disk 

* SELF IMPROVEMENT " 

DIET CALC — Tell the computer 
what you eat and what activity you do 
and it will calculate your gain or loss. 
VIC 19 95 tape 24 95 disk 
64 available soon. 

All orders add 1 50 handling 
Send for Free Catalog 



MYSTIC SOFTWARE 

P.O. BOX 536 

LAKESIDE, CA 92040-0536 

(619) 443-9776 

Commodore 64'" and vie 20'* are registered 

trademarks of Commodore Business 

Machines. Inc. 



Circle No 56 



Our Toll Free 

Subscription Number is 

1-800-426-1830 



K«m:M»I«3d«?1 



FULL FACTORY WARRAMTY 




Also SAVE on ... 
A COMPLETE line of COMODORE Accessories 

List YOUR 

I'r ice PRICE 

VlC-1541 CDi^l- Drive).. .399.08 J 39 . 00 

VJC-l'i?5 (Primer) 395.00 -139.00 

VIC 15/10 (Tataseue) 74.95 64.95 

VIC 160B ( Model ) 109.95 97.00 

Special Package Prices Available ! 

• •• 

Uide Selection of 64 SOFTUARE ■ 

(313) 295-2330 *** 

Ue SERVICE ALL COtltlODORE Coiputers 
yith LIBERTY your FULL SERVICE Coiputer Center 

Catalog and Information about FREE SOFTWARE for the 64 ! 




Call or Urite for a FREE catalog 
LIBERTY COmPUTER DISTRIBUTORS 

P.O. BOX 1786 313-295-2330 
DEARBORN, MICHIGAN 48121 

MONEY ORDERS AND CASHIER'S CHECKS - FREE SHIPPING 

ALL COD'S REQUIRE 25V. DEPOSIT 

PERSONAL CHECKS ALLOW 2-4 WEEKS 

CANADIAN ORDERS ADD 57. 

PRICES SUBJECT TO CHANGE 



SAVE 

Send for 



LIBERTY COMPUTER DISTRIBUTORS 
P.O. BOX 17B6 
DEM^BORN, MI 4B121 
(313) 2«?5-2330 



'COMMODORE 64' REG. TRADEMARK CBM, INC. 



Circle No. 23 
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I'LINEtt 


LOC 


CODE 




LINE 






|'| 0O001 


0000 








.;FUT"@0 : MS M 




1100002 


0000 








,i 






jij 00003 


0000 








; ++++++++++++++++++++++++++++++++++++ 


|'| 00004 


0000 








; + 


ASCII TERMINAL PROGRAM + 


l|l00005 


0000 








.; + 


VERSION 1. 


+ 


!>! 00006 


0000 








.; + 


82/'04/lS 


+ 


|'| 00007 


0080 








.; + 


HOWARD ROTENBERG + 


1100003 


0000 








.; ++++++++++++++++++++++++++++++++++++ 


jij 00009 


0000 








.; 






|'|00010 


0000 








OPEN I 


= $F7RF 


;OPEN FOR INPUT 


^ 0@@ 1 i 


0000 








OPENO 


= $F7FE 


:OPEN FOR OUTPUT 


j 000 12 


0090 








STATUS 


= $96 


;3T 


|||00013 


0000 








WRITE 


= $FFD2 


..PRINT A CHR 


1100014 


0000 








GETCHR 


= $FFE4 


,GET A CHR 


]'J00015 


0000 








CLERR 


= $F2A6 


; CLEAR ALL CHANNELS 


|| 0001 S 


0000 








OPEN 


= $F563 


;OPEN FILE 


1100017 


0000 








CLOSE 


= $F2E2 


; CLOSE FILE 


'1 000 IS 


0000 








DFflULT 


= $FFCC 


.: RESTORE DEFAULT DEVICE 


|'|00013 


0000 








TALK 


= $F0D2 


;SEND TALK 


1100020 


0000 








UNTflLK 


= $F1AE 


;SEND UNTflLK 


!'] 00021 


0000 








LISTEN 


= $F0D5 


;SEND LISTEN 


1100022 


0000 








UNLISH 


= $F1B9 


..SEND UNLISTEN 


11 00023 


0000 








GETIEE 


= *F1C8 


.: HANDSHAKE BVTE IN 


]'| 00024 


0000 








CHKSTP 


= $F335 


; CHECK FOR STOP KEV 


1100026 


0000 








.» 






'00027 


0000 










* = $9000 


.LORD ADDRESS 


100028 


9000 








.' 






1100029 


9000 








; 


OPEN FILES 




'[ 00030 


9000 








,; 






|'| 00031 


9000 


fl9 


05 






LBA #5 


;GET DEVICE NUMBER 


1100032 


9002 


85 


D2 






STA $B2 


.: STORE LFN 


'! 00033 


9084 


85 


D4 






STA $B4 


.: STORE DEVICE NUMBER 


i'i 00034 


9B&6 


m 


00 






LBA #0 




II 00035 


9008 


85 


IU 






STA $B1 


;NO FILE NAME 


'[ 00036 


900fl 


fl9 


FF 






LBA #255 




|'| 00037 


908C 


OCT 

Q.J 


H3 






STA $B3 


;NO SECONDARV ADDRESS 


II 0003S 


900E 


20 


63 


F5 




JSR OPEN 


;OPEN MODEM 


>! 00039 


9011 














|'| 00040 


9011 










MAIN PROGRAM 




II 00041 


9011 












. 


■j 00042 


9811 


20 


74 


90 


MAIN 


JSR RECV 


J RECEIVE CHAR 


1 00043 


9014 


20 


35 


F3 




JSR CHKSTP 


;STOP PRESSED 


1 00044 


9017 


F0 


0E 






BEQ STPRES 


; VES 


■! 00045 


9019 


20 


E4 


FF 




JSR GETCHR 


;GET CHARACTER 


'i 00046 


90 1C 


F0 


F3 






BEQ MAIN 


.; NOTHING THERE 


![ 00047 


901E 


20 


2fi 


90 




JSR TOASC 


.TRANSLATE TO ASCII 


j 00048 


9021 


28 


92 


90 




JSR KMT 


; TRANSMIT CHARACTER 


'l 00043 


9024 


4C 


11 


90 




JMP MAIN 


;LOOP BACK 


1 00050 


9027 


4C 


A9 


90 


STPRES 


JMP QUIT 


;GO TO END AND CLOSE FILES 


'j 00051 


902fl 








.t 






1 00052 


902fl 








# i 


CHANGE PET T 


ASCII 


1 00053 


902fl 








.; 






'j 00054 


902fl 


C9 


41 




TOASC 


CMP #$41 


,<:= LOWER CASE 'ft' 


1 00055 


902C 


30 


18 






Bill flBELET 


.:VES THEN CHECK FOR DELETE 

KXXSQOOQOOOQiPOQOOQOOOgOOO 
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LIHE# 1 


_DC 


:obe 




LINE 






BBBBBBBGBBCeQQBOeeQOBe 


90056 


902E 


C9 5B 






CMP 


#$5B 


.;>= LOWER CASE 'Z" <$5R> j!| 


00057 


9030 


10 06 






BPL 


NXTCHK 


;VES GOTO NEXT CHECK < 


00058 


9032 


18 






CLC 




.; HO fl 


80059 


9033 


€3 20 






BBC 


#$20 


..CONVERT TO UPPER CRSE J,| 


00060 


9035 


4C 43 


90 




JMP 


EXIT 


..RETURN TO MAIN ROUTINE |j 


00061 


9038 


C9 CI 




NXTCHK 


CMP 


#$C1 


,<= UPPER CRSE -R- ij 


00062 


9@3fi 


30 07 






BUI 


exit 


,VES THEN NO CHANGE j.j 


60063 


903C 


C9 DB 






CMP 


#$DE 


;>=? UPPER CRSE -Z-' <$Bfl> ' 


00064 


903E 


10 03 






BPL 


EXIT 


;VES SO NO CONVERT ill 


00065 


9040 


38 






SEC 




; no j,| 


0&Q66 


9041 


E9 80 






SEC 


#$80 


J CONVERT TO LOWER CRSE |' 


00067 


9043 


29 7F 




EXIT 


AHB 


#$7F 


,MRSK 7"TH BIT i|i 


00063 


9045 


60 






RTS 




;BRCK TO MAIN ROUTINE '.' 


d&0€3 


9046 


C9 14 




RDELET 


CMP 


#$14 


;IS IT A BELETE !'| 


00070 


9048 


1)0 F9 






BNE 


EXIT 


,HO SO GET OUT i|l 


00071 


904R 


18 






CLC 




.; VES jij 


00072 


904E 


fl9 08 






LBR 


#$S 


.; CHANGE TO BACKSPACE j 1 


00973 


904B 


4C 43 


90 




JMP 


EXIT 


;AHB GET OUT fl 


00074 


9050 






.i 








00075 


9050 






.; CHANGE 


: rscii 


TO PET !; 


80076 


9050 






; 








00077 


9050 


C9 41 




FRSCII 


CMP 


#$41 


iC- UPPER CASE -'H-' j!| 


00078 


9052 


30 16 






EMI 


PBELET 


:VES THAN CHECK FOR BACKSPACE, 1 ! 


00079 


9054 


C3 5B 






CMP 


#$5B 


.;>= UPPER CRSE -Z-' C$5R) H 


00080 


9056 


10 06 






BPL 


CHKHXT 


;VES GOTO NEXT CHECK H 


00081 


9958 


18 






CLC 




i NO (j 


00082 


9059 


69 80 






ABC 


#$8@ 


; CONVERT TO PET LOWER CASE if 


00083 


905E 


4C 63 


90 




JMP 


OUT 


.RETURN TO MAIN ROUTINE J] 


00084 


905E 


C9 61 




CHKNXT 


CMP 


#$61 


.; ■:= LOWER CASE A"' ij 


00085 


9060 


30 07 






BMI 


OUT 


,VES SO NO CHANGE Ii 


00086 


9062 


C9 7B 






CMP 


#$7B 


;>= LOWER CASE *Z' <$7A> S 


00087 


9064 


10 03 






BPL 


OUT 


;VES SO NO CONVERT j'j 


00088 


9®£S 


38 






SEC 




.; NO ji 


00039 


9S67 


E9 20 






SBC 


#$20 


.CONVERT TO PET UPPER CASE \\ 


00090 


9069 


60 




OUT 


RTS 




;EACK TO MAIN ROUTINE Jj 


00091 


906M 


r:i flfl 




PBELET 


CMP 


#$8 


;IS IT A BACKSPACE i|i 


00092 


906C 


D0 FB 






BNE 


OUT 


,;NO SO GET OUT '{ 


00093 


986E 


18 






CLC 




; ves i 1 ! 


00094 


906h 


m 14 






LBR 


#$14 


.: CHANGE TO PET BELETE ij 


00095 


9071 


4C 69 


98 




JMP 


OUT 


;ANB GET OUT jj 


00096 


9074 






; 








00097 


9R74 






.; RE l: 


00098 


9074 






.' 








00099 


9074 


48 




RECV 


PHR 




,SRVE CHARACTER Jj 


00100 


9075 


20 B2 


F6 




JSR 


TRLK 


;S£NB TRLK i|i 


00101 


9078 


R2 05 






LBX 


#5 


;FILE NUMBER ',' 


00102 


907H 


20 flF 


F7 




JSR OPEN I 


;OPEN MODEM FOR INPUT j 1 ! 


00103 


907D 


68 






PLR 




..RESTORE CHARACTER i|i 


00 1 04 


907E 


20 C© 


Fl 




JSR 


GETIEE 


;GET CHAR FROM MOBEM |.J 


00 1 05 


9081 


Fi4 9S 






LBV 


STATUS 


;GET STATUS fi 


00106 


9083 


D0 06 






BNE 


NOBVTE 


;NOT = ii 


00107 


9085 


20 56 


90 




JSR 


FRSCII 


.; TRANSLATE TO PET B 


00108 


9088 


20 B2 


FF 




JSR 


WRITE 


j WRITE CHARACTER TO CRT jj 


00 1 09 


908E 


20 f\€ 


F2 


NOBVTE 


JSR 


CLEAR 


; CLEAR CHANNEL fl 


00110 

BBBflDQOOO 


908E 


20 RE 

MOODC 


Fl 
lee 


BHBQQI 


JSR 

9CMC 


UNTftLK 

MOBOO 


;UNTALK fi 
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LINE# 

00111 

00112 

00113 

00114 

00115 

00116 

00117 

00118 

00119 

00120 

00121 

00122 
00123 

00 1 24 
00125 
60 1 26 
00127 
O0 1 28 
00123 
00 1 30 

00131 

00132 
00133 



LOG 

9091 
9092 
9992 
9092 
9092 
9093 
9096 
9Q9B 



969C 
909F 
90fl2 
90H5 
90A8 
98 A3 
90A9 
30H9 
90H9 
30AE 
30HE 
90E0 
90E3 
90B4 



CODE 
60 



48 

20 D5 F0 

A2 05 

20 FE F7 

68 

20 D2 FF 

20 A6 F2 

20 B9 Fl 
20 CC FF 
60 



Fi2 @5 
20 A6 F2 
fi9 65 
29 E2 F2 
60 



LINE 



RTS 



;BflGK TO MAIN ROUTINE 



TRANSMIT ROUTINE 



KM IT 



QUIT 



PHA 


;SRVE CHARACTER 


JSR LISTEN 


;SEND LISTEN 


LDX #5 


;FILE NUMBER 


JSR OPENO 


;OPEN CHANNEL FOR OUTPUT 


PLA 


.; RESTORE CHARACTER 


JSR WRITE 


;FRINT#5 


JSR CLEAR 


.: CLEAR CHANNEL 


JSR UNLISN 


:SEND UNLISTEN 


JSR DFAULT 


.RESTORE DEFAULT DEVICE 


RTS 


..BACK TO MAIN ROUTINE 


CLOSE FILES 




LB>! #5 


..FILE NUMBER 


JSR. CLEAR 


; CLEAR CHANNELS 


LDA #5 


.;FILE NUMBER 


JSR CLOSE 


; CLOSE FILE 


RTS 


iEXIT TERMINAL MODE 


.END 





ERRORS = 00000 



SVMEOL TABLE 



SVMBOL \ 


'ALUE 














ADELET 


9046 


CHKHXT 


905E 


CHKSTP 


F335 


CLEAR 


F2A6 


CLOSE 


F2E2 


DFAULT 


FFCC 


EXIT 


9043 


FASCII 


3S50 


GETCHR 


FFE4 


OETIEE 


Fice 


LISTEN 


F0D5 


MAIN 


9011 


NOBVTE 


908B 


NXTCHK 


9838 


OPEN 


F563 


OPEN I 


F7AF 


OPENO 


F7FE 


OUT 


9063 


PDELET 


906A 


QUIT 


30A9 


RECV 


y074 


STATUS 


9096 


STPRES 


9027 


TALK 


F0D2 


TOASC 


302A 


UNLISN 


F1B9 


UNTALK 


F1AE 


WRITE 


FFD2 


KM IT 


9092 















END OF ASSEMBLY 



OSS REFERENCE. 


■ ■ ■ ■ * 


PAGE 


1 




ADELET $9046 


55 


69 






CHKNXT *905E 


88 


84 






CHKSTP $F335 


24 


43 






CLEAR *F2A6 


15 


109 


121 


123 


CLOSE *F2E2 


17 


131 






DFAULT $FFCC 


18 


123 






EXIT $9043 


60 


62 


64 


67 



79 



70 
t O 



a oooooo ooooc 
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FASCII 


$9056 


_^_^ 


187 








GETCHR 


$FFE4 


14 


45 








GETIEE 


$F1C8 


23 


184 








LISTEN 


$F0B5 


21 


116 








MAIN 


$9011 


42 


46 


49 ! 






NOBVTE 


$908B 


106 


189 








NXTCHK 


$9838 


57 


61 








OPEN 


JF563 


16 


38 




1 




GPEHI 


$F7AF 


10 


182 




j 




OPEHO 


$F7FE 


11 


118 








OUT 


$9869 


83 


85 


87 98 92 95 jj 






FBELET 


$906A 


78 


91 








QUIT 


$90A9 


58 


128 








RECV 


$9074 


42 


99 








STATUS 


$8096 


12 


105 








3TPRES 


$9027 


44 


58 








TALK 


$F8D2 


19 


180 








TOflSC 


$902fi 


47 


54 








UNLISN 


$F1B9 


22 


122 








UNTflLK 


$F1AE 


28 


110 








WRITE 


$FFD2 


13 


108 


120 i 






XMIT 


$9092 


48 


115 




LIHEtt 


LOC 


CODE 


LINE 








90001 


8000 




; PUT "SS: MODEM 


2. SRC" i 


00002 


0008 












80063 


9088 




, +++++++++++++++++++++++++++++++++++++++ X 


00004 


8888 




: + 


SAMPLE TERMINAL PROGRAM + n 


90005 


8000 




.:+ FOR PET 


TO PET COMMUNICATIONS + n 


00006 


8000 




.; + 


TO SHOW EXAMPLE OF OPENING + X 


00007 


0008 




.;+ AN : 


[EEE DE 


VICE 


FOR INPUT AND OUTPUT + n 


00008 


8898 




.; + 




BV HOWARD ROTEHBERO + fi 


00009 


0008 




; + 




TORONTO CANADA + 8 


900 1 


0000 




.; +++++H 








000 1 1 


8000 




\ 








00012 


8808 




OPEN I 


= $F7AF 


..OPEN FOR INPUT ! 


00013 


8800 




STATUS 


= $36 




.: ST 1 1 


00014 


0000 




WRITE 


= $FFI 


2 


; PR I NT A CHR ii 


90015 


8060 




GETCHR 


= *FFE4 


;GET A CHR ' 


00016 


0888 




OPENO 


= $F7FE 


,'QPEN FOR OUTPUT n 


00017 


8000 




CLEAR- 


= $F2A6 


; CLEAR ALL CHANNELS n 


90018 


0068 




OPEN 


= $F56 


3 


;OPEN FILE 


00019 


3908 




CLOSE 


= $F2E 


■^ 


; CLOSE FILE ii 


90020 


0000 




DFAULT 


= $FFC 


c 


..RESTORE DEFAULT DEVICE j' 


88021 


8888 




TALK 


= $F8I 


2 


J SEND TALK 


9O022 


9008 




UNTflLK 


= $F1AE 


.iSEND UNTflLK n 


98S23 


9000 




LISTEN 


= $F8I 


15 


;SEND LISTEN j| 


08024 


8808 




UNLISN 


= $F1B9 


;SEND UNLISTEN 


80025 


0000 




GETIEE 


= $F1C 


•'8 


; HANDSHAKE BVTE IN n 


00026 


0000 




CHKSTP 


= $F3G 


:5 


; CHECK FOR STOP KEV j 


00027 

IQPBDBBDDBC 


9000 

»ese 


BBBBOI 


SOOOOO 


BBBBB 


eeoc 


iBBBaHBHBDBBBBBCBHBBBBpii 
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00928 


0008 








00029 


9098 








0003Q 


9000 








00631 


3800 








00032 


9000 


R9 


©s 




00033 


9002 


35 


D2 




30034 


9804 




D4 




30035 


9006 


R9 


00 




00036 


9G03 


85 


HI 




50037 


300fl 


A9 


FF 




90038 


909C 




m 




U0033 


909E 


28 


63 


F5 


00040 


3011 






.; 


00041 


3011 






.• 


00042 


3011 






.; 


00043 


3011 


29 


24 


96 M 


00044 


3014 


20 


35 


F3 


00045 


3017 


F0 


3D 




00046 


3013 


20 


E4 


FF 


00047 


98 1C 


F0 


F3 




00043 


30 IE 


20 


3F 


90 


00049 


302 1 


4C 


11 


90 


00050 


3024 






.. 


00051 


3024 






, 


00052 


3024 






, 


00053 


3024 


48 




R 


00054 


3025 


20 


B2 


F0 


00055 


3028 


02 


05 





* = $9000 .; LORD RDDRESS 
OPEN FILES 

LBfi #5 ;GET DEVICE NUMBER 

STfl $D2 ; STORE LFN 

STfl *D4 ; STORE DEVICE NUMBER 

LHA #0 ;GET fl 6 FOR 

STfl *D1 ,H0 FILE. NAME 

LBfl #255 ,DET 255 TO 

STfl *D3 ; STORE SECONDflRV ADDRESS 

JSR OPEN ,OPEN MODEM 

r-tflIN PROGRAM 

JSR RECV ; RECEIVE CHAR 
JSR CHK3TP.;ST0P PRESSED 
BEQ QUIT i VES QUIT 
JSR getchr;get CHARACTER 
BEQ MAIN iWHEN NOTHING 
JSR KM IT ; TRANSMIT CHARACTER 
JMP MAIN .LOOP BACK 

RECEIVING ROUTINE 



RECV 



PHA 

JSR TALK 

LDX #5 



.SAVE CONTENTS OF ACCUMULATOR 
..SEND TALK 
..FILE NUMBER 



LINES LOC CODE 



LINE 



00056 
O0057 
00058 
00059 

00060 
00061 

00062 

00063 
00064 
00065 
00066 

00067 
O0068 
S0069 

00070 
00071 

00072 
00073 

00074 
00075 
00076 
00077 



902A 
902D 
902E 
9031 
9033 

9f 



AF 

CO 
96 



28 

68 
20 
A4 
D8 83 



9838 
983B 



903F 
983F 
983F 
9S3F 
9848 
9843 
9845 
9848 
9849 
904C 
984F 
9052 
9055 



28 
20 
28 
68 



48 
28 
A2 
20 
68 
28 
28 
28 
28 
£0 



D2 
A6 
AE 



F7 
Fl 

FF 



JSR 
FLA 
JSR 
LBV 



OPEN I 



J OPEN MODEM FOR INPUT 
.: RESTORE CONTENTS OF ACCUMULATOR 
GET I EE; GET CHAR FROM MODEM 
STATUS; GET STATUS 
BNE NOBVTE 

JSR WRITE ; WRITE CHARACTER TO CRT 
F2 NOBVTE - T £R CLEAR ; CLEAR CHANNEL 
Fl JSR UNTALKjIJNTALK 

RTS ;BACK TO MAIN ROUTINE 



TRANSMIT ROUTINE 



D5 

85 
FE 

D2 

A6 
E9 
CC 



F0 

F7 

FF 
F2 
Fl 
FF 



KM IT 



PHA 
JSR 
LDH 
JSR 
PLA 
JSR 
JSR 
JSR 
JSR 
RTS 



CONTENTS OF ACCUMULATOR 
LISTEN 

;FILE NUMBER 

..OPEN CHANNEL FOR 

i RESTORE CONTENTS 

;PRINT#5 

; CLEAR CHANNEL 
UNL I SN .; SEND UNL I STEN 
DFAULT ; RESTORE DEFAULT DEVICE 

.BACK TO MAIN ROUTINE 



.: SAVE 
LISTEN .SEND 
#5 
OPENO 

WRITE 
CLEAR 



OUTPUT 

OF ACCUMULATOR 
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ae iiDiaa QB a O CQSQ BD Q aQ O a O D Q'Q QO Q QDP DB OO Q a aDOO Q a o aHD Q G POeOOOOOC 



90878 9656 



600 73 


9856 






00880 


3856 






08881 


9856 


A2 


05 


88832 


9858 


28 


A6 


88033 


905E 


A3 


65 


00084 


985D 


28 


E2 


80085 


3868 


60 




80886 


3861 







CLOSE FILES AND RETURN TO BASIC 



QUIT 



F2 



f: 



LUX #5 
JSR CLERR 
LDR #5 
JSR CLOSE 
K I S 
. END 



;FILE NUMBER 
; CLEAR CHANNELS 
;FILE NUMBER 
.; CLOSE FILE 



ERRORS = 00800 



3VNE0L TABLE 
SVMBOL VALUE 



CHKSTP 


F335 


CLEAR 


F2A6 


CLOSE 


F2E2 


DFRULT 


FFCC 


GETCHR 


FFE4 


GETIEE 


F1C0 


LISTEN 


F8D5 


MAIN 


9811 


HOBVTE 


3838 


OPEN 


F563 


OPEN I 


F7RF 


OPENO 


F7FE 


QUIT 


9y56 


RECV 


9824 


STATUS 


8096 


TALK 


F8D2 


UNLISH 


F1B3 


UNTALK 


F1AE 


WRITE 


FFB2 


XMIT 


303F 



END OF ASSEMBLY 



CROSS REFERENCE, 



: 'AGE 



CHKSTP 


*F335 


26 


44 




CLEAR 


$F2fi6 


17 


62 


74 


CLOSE 


*F2E2 


19 


84 




BFAULT 


$FFCC 


28 


76 




GETCHR 


*FFE4 


15 


46 




OETIEE 


*F1C0 


-iC 


58 




LISTEN 


$F0D5 


23 


69 




MAIN 


$9011 


43 


47 


49 


NOBVTE 


$3038 


60 


62 




OPEN 


*F563 


18 


39 




OPEN I 


*F7AF 


12 


5t* 




OPENO 


*F7FE 


16 


71 




QUIT 


$3856 


45 


81 




RECV 


$3824 


43 


53 




STATUS 


$8036 


13 


59 




TALK 


*F0B2 


21 


54 




UNLISN 


$F1B9 


24 


75 




UNTALK 


$F1AE 




63 




WRITE 


*FFD2 


14 


61 


73 


XMIT 


$303F 


48 


68 





S2 
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Vanilla Pilot? 

Yes, Vanilla Pilot! 

What is Vanilla Pilot? 



Vanilla Pilot is a full- featured pilot 
language interpreter including TURTLE 
GRAPHICS for the PET or CBM 4000, 
80C0, 9000 and CBM-64 series computers 

At last! A Pilot interpreter for the 
Commodore computers. This Pilot in- 
cludes some powerful extensions to 
the screen editor of the computer. 
Things like FIND /CHANGE, TRACE 
and DUMP enhance the programming 
environment. 



The TURTLE has a very powerful set 
of graphics commands. You can set the 
Turtle's DIRECTION and turn him LEFT 
or RIGHT. The pen he carries can be 
set to any of the 16 colors in the CBM- 
64. He can DRAW or ERASE a Line. 

What else? Vanilla Pilot is all this and 
much, much more. In fact, we can't 
tell you about all of the features of 
the language in this small ad. So 
rush down to your local Commodore 
computer dealer and ask him to show 
you Vanilla Pilot in action. 



Tamarack Software 
Darby, MT. 59829 
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AARDVARK - THE ADVENTURE PLACE 
TRS-80 COLOR COMMODORE 24 VIC-20 SINCLAIR/TIMEX TI99 



WE CARRY MORE THAN ADVENTURES!! 

MAXI-PROS WORD PROCESSING ^^ 

The easiest to use word processor that I 
know of. Has all the features of a major word 
processor {right and left margin justification, 
page numbering, global and line editing, single, 
double, triple spacing, text centering, etc.) at 
a very cheap price because we wrote it in 
BASIC. Includes 40 page manual and learning 
guide. Easily modified to handle almost any 
printer combination. Available on disk or tape 
for VIC20, COMMODORE64, and TRS-80 
COLOR computer. Requires 13k RAM on 
Vic, 16k EXTENDED on TRS-80 COLOR. ^ 
$19.95 on tape $24.95 on disk. ^ 

GENERAL LEDGER - Complete bookkeep- 
ing for a small business. Disk required. For 
Vic20 (13k), Commodore64, TRS^80 COLOR 
(16k EXTENDED). $69.95 (Send $1.00 for 
manual before ordering.) 




LABYRINTH - 16K EXTENDED COLOR 
BASIC — With amazing 3D graphics, you fight 
your way through a maze facing real time 
monsters. The graphics are real enough to 
cause claustrophobia. 

Similar game for Timex/Sinclair 16k - hunting 
treasure instead of monsters $14.95. 




ADVENTURE WRITING/DEATHSHIP by 
Rodger Olsen — This is a data sheet showing 
how we do it. It is about 14 pages of detailed 
instructions how to write your own adven- 
tures. It contains the entire text of Deathship. 
Data sheet - $3.95. NOTE: Owners of TI99, 
TRS-80, TRS-80 Color, and Vic 20 computers 
can also get Deathship on tape for an addi- 
tional $5.00. 

Dealers-We have the best deal going for you. 
Good discounts, exchange programs, and fac- 
tory support. Send for Dealer Information. 
Authors — Aardvark pays the highest commis- 
sions in the industry and gives programs the 
widest possible advertising coverage. Send a 
Self Addressed Stamped Envelope for our 
Authors Information Package. 



ADVENTURES — Adventures are a unique 
form of computer game. They let you spend 
30 to 70 hours exploring and conquering a 
world you have never seen before. There is 
little or no luck in Adventuring. The rewards 
are for creative thinking, courage, and wise 
gambling — not fast reflexes. 

In Adventuring, the computer speaks and 
listens to plain English. No prior knowledge 
of computers, special controls, or games is re- 
quired so everyone enjoys them — even people 
who do not like computers. 

Except for Quest, itself unique among Ad- 
venture games. Adventures are non-graphic. 
Adventures are more like a novel than a comic 
book or arcade game. It is like reading a par- 
ticular exciting book where you are the main 
character. 

All of the Adventures in this ad are in Basic. 
They are full featured, fully plotted adventures 
that will take a minimum of thirty hours (in 
several sittings} to play. 

Adventuring requires 16k on Sinclair, TRS- 
80, and TRS-80 Color. They require 8k on OSI 
and 13k on VIC-20. Sinclair requires extended 
BASIC. Now available for TI99. 



TREK ADVENTURE by Bob Retelle - This 
one takes place aboard a familiar starship and 
is a must for trekkies. The problem is a famil- 
iar one — The ship is in a "decaying orbit" 
(the Captain never could learn to park!) and 
the engines are out (You would think that in 
all those years, they would have learned to 
build some that didn't die once a week). Your 
options are to start the engine, save the ship, 
get off the ship, or die. Good Luck. 

Authors note to players — I Wrote this one 
with a concordance in hand. It is very accurate 
— and a lot of fun. It was nice to wander 
around the ship instead of watching it on T.V. 

DERELICT by Rodger Olsen and Bob Ander- 
son — For Wealth and- Glory, you have to ran- 
sack a thousand year old space ship. You'll 
have to learn to speak their language and 
operate the machinery they left behind. The 
hardest problem of all is tojive through it. 

Authors note to players — This adventure 
is the new winner in the "Toughest Adventure 
at Aardvark Sweepstakes". Our most difficult 
problem in writing the adventure was to keep 
it logical and realistic. There are no irrational 
traps and sudden senseless deaths in Derelict. 
This ship was designed to be perfectly safe for 
its' builders. It just happens to be deadly to 
alien invaders like you. 

Dungeons of Death — Just for the 16k TRS- 
80 COLOR, this is the first D&D type game 
good enough to qualify at Aardvark. This is 
serious D&D that allows 1 to 6 players to go 
on a Dragon Hunting, Monster Killing, Dun- 
geon Exploring Quest. Played on an on-screen 
map, you get a choice of race and character 
(Human, Dwarf, Soldier, Wizard, etc.), a 
chance to grow from game to game, and a 15 
page manual. At the normal price for an Ad- 
venture ($14.95 tape, $19.95 disk), this is a 
giveaway. 



PYRAMID by Rodger Olsen - This is one of 
our toughest Adventures. Average time 
through the Pyramid is 50 to 70 hours. The 
old boys who built this Pyramid did not mean 
for it to be ransacked by people like you. 

Authors note to players — This is a very 
entertaining and very tough adventure. I left 
clues everywhere but came up with some in- 
genous problems. This one has captivated 
people so much that I get calls daily from as 
far away as New Zealand and France from 
bleary eyed people who are stuck in the 
Pyramid and desperate for more clues. 

MARS by Rodger Olsen - Your ship crashed- 
on the Red Planet and you have to get home. 
You will have to explore a Martian city, repair 
your ship and deal with possibly hostile aliens 
to get home again. 

Authors note to players — This is highly 
recommended as a first adventure. It is in no 
way simple— playing time normally runs from 
30 to 50 hours — but it is constructed in a 
more "open" manner to let you try out ad- 
venturing and get used to the game before 
you hit the really tough problems. 




QUEST by Bob Retelle and Rodger Olsen - 
THIS IS DIFFERENT FROM ALL THE 
OTHER GAMES OF ADVENTURE!!!! It is 
played on a computer generated map of 
Alesia. You lead a small band of adventurers 
on a mission to conquer the Citadel of Moor- 
lock. You have to build an army and then arm 
and feed them by combat, bargaining, explora- 
tion of ruins and temples, and outright ban- 
ditry. The game takes 2 to 5 hours to play 
and is. different each time. The TRS-80 Color 
version has nice visual effects and sound. Not 
available on OSI. This is the most popular 
game we have ever published. 

32K TRS 80 COLOR Version $24.95. 
Adds a second level with dungeons and 
more Questing. 

PRICE AND AVAILABILITY: 

All adventures are $14.95 on tape. Disk 
versions are available on VIC/COMMODORE 
and TRS-80 Color for $2.00 additional. $2.00 
shipping charge on each order. 



Please specify system on all orders 
ALSO FROM AARDVARK - This is only a partial list of what we carry. We have a lot of other games (particularly for the 
TRS-80 Color and OSI), business programs, blank tapes and disks and hardware. Send $1.00 for our complete catalog. 

AARDVARK 
2352 S. Commerce, Walled Lake, Ml 48088 / (313) 669-3110 

Phone Orders Accepted 8:00 a.m. to 4:00 p.m. EST. Mon.-Fri. 




TRS-80 COLOR 



TIMEX/SINCLAIR 



COMMODORE 64 



VIC-20 



$2.00 shipping on each order 
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Pie Graph 



by Eric Giguere 
Peace River, Alberta, Canada 



The Super Expander cartridge from 
Commodore offers the VIC owner 
easy access to some remarkable 
graphic capabilities. These graphics 
can be used not only for entertain- 
ment, but also for more practical pur- 
poses, such as creating graphs. This 
is the object behind this article— to 
show you how to use the Super Ex- 
pander in the creation of graphs. Ac- 
tually, we're only going to deal with pie 
graphs, but you can apply some of 
these methods to other kinds as well. 

What is a Pie Graph? 

Figure 1 is an example of a pie 
graph. It is a circle divided up into 
various "pieces", each representing a 
specific percentage of the pie as a 
whole. Direct comparisons are easily 
made, as the larger the percentage, 
the bigger the piece. It's a convenient 
way of showing how resources or 
money is being used, and how much 
is being used exactly (of course, it 
doesn't just apply to money— it can be 
used for anything that totals up to 
100%). Like they say, a picture is 
worth a thousand words, and that's 
easy to see when compared with the 
chart in Figure 2, which lists the same 
information show in the pie graph. 
From which one do you absorb 
the most information? Isn't it easier to 
make conclusions from the graph than 
from the chart? That's the reasoning 
behind the extensive use of charts in 
business. Hey! There's a real use for 
these graphs with the Super Ex- 
pander! It can be used for business 
purposes! Got your interest now? 
Good, because it isn't that hard and 
it is useful to be able to use pie 
graphs, if only to impress your friends! 

Creating the Graph 

Type in Program I (Pie Graph 
Demo) and RUN it (you can exclude 
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all REM statements and lines that on- 
ly have a colon ":" in them). This is a 
demonstration of what you can 
achieve with the Super Expander. All 
the program does is plot a circle, 
choose a random angle, and then col- 
or in the two parts of the pie. It also 
alternates the pie colors for each draw- 
ing. It will continue to run until you hit 
a key, at which time it will stop and 
return to the text mode. By now you're 
probably impressed with what can be 
done and want to know how I did it, 
so I won't keep you in suspense any 
longer. After you read this, you'll pro- 
bably think how easy it is! 

First, we have to set up some 
variables, as done in line 1 5. Here we 
define the function FNR(Z) to equal the 
formula for generating a number bet- 
ween and Z. We then define all other 
permanent variables. X and Y are the 
coordinates for the center of the 
screen, RX and RY are the circle's 
radius in X and Y, and C is a constant 
used in our formulas in lines 70 and 
75. Notice that the X radius (RX) is less 
than the Y radius (RY). This is to ac- 
count for the fact that the pixels (dots) 
on the screen are shorter than they are 
tall, and a circle with RX and RY the 
same would actually be an oval. Thus 
both variables are different to correct 
the problem and make sure the circle 
is indeed a circle. 

Line 20 randomly selects the two 
colors in which the pie will be filled (but 
keeps the background and border col- 
ors the same), and then draws the cir- 
cle with the CIRCLE command in the 
middle of the screen as defined by X 
and Y. We then proceed to line 25, 
which draws a straight line from the 
center of the circle to its right side. T 
is used by the formulas in the X-Y 
routine as the degree (0 to 359) that 
you wish to use. In this case it equals 



zero (0), and so the line drawn by 
DRAW represents the start of the 
circle. 

Line 30 gets a random number for 
the degree, and gosubs 70 to find the 
proper X-Y location it needs. The 
DRAW in line 35 then draws a line from 
the center to the appropriate point on 
the edge of the circle. This is the divi- 
sion line, and the pie is now separated 
into two parts. We could stop here, but 
I chose to add some color to the 
graph, and so used the PAINT com- 
mands in lines 40 and 45. The coding 
preceding the paints is used to find an 
offset from the division line so that the 
PAINT routine will fill in the space bet- 
ween the lines (otherwise it won't do 
anything). This done, line 50 prints out 
the angle of the division line at the top 
corner of the screen and then waits 
while the VIC counts to a thousand. 
The keyboard buffer is then checked 
to see if a key has been pressed, and 
if not then it returns to draw another 
graph. 

Lines 70 and 75 are the important 
parts of the program. They use SIN 
and COS to find the actual point on the 
edge of the circle that the angle T 
refers to, and returns these in the 
variables X% and Y%. This routine 
was from an article in the March 1 983 
issue of COMPUTE! magazine, and 
though I'm not exactly sure how it 
works, it does the job just fine, even 
after a bit of careful modification. It 
sure saved me a lot of trouble! 

Pie Graphs and Percentages 

Program 2 (Pie Graph 1) is also 
mainly a demonstration, but it can be 
modified for more practical purposes. 
It lets you enter a percentage from 1 
to 99 and will then make a graph using 
that figure. Although the program uses 
only the integer portion of your figure 



so that it can be neatly displayed on 
the screen, the program can be quite 
accurate, down to about .5%. About 
the only thing different in Program 2 
as compared to Program 1 is line 1 25, 
which calculates the proper angle for 
your percentage by multyplying it by 
360 and dividing it by 1 00. The rest is 
pretty well much the same as in Pro- 
gram 1. If you wish to stop the pro- 
gram, simply hit 'Q' after it has finish- 
ed with the graph. 

Conclusion 

Many useful adaptations can be 
made to these programs. You can add 
a printout module, labels, etc. In any 
case, these programs are good as 
demonstrations of the VIC's graphics 
and the easy use of Super Expander 
commands (few computers have a 
PAINT command). I just hope that you 
enjoy these programs, and if there is 
enough interest, I might publish a few 
more programs like these for use with 
the Super Expander. □ 

Figure 1: Example Pie Graph show- 
ing the imaginary sales of an imag- 
inary product. 



25% 
Canada 




12.5% 
Other 



12.5% 
England 



Figure 2: A chart showing the same 
information in Figure 1. 



o/o 



Place 



50.0 
25.0 
12.5 
12.5 



U.S.A. 
Canada 
England 

Other 



Commodore 64 

HARDWARE AND SOFTWARE 



MASS STORAGE: 



C 



PHiaiSKII 



)High Performance FLOPPY DISK 
for Commodore 64 



PEDISK directly transfers data to computer memory. This and the 
250000 bps transfer rate means performance up to 1 times faster than 
a serial bus disk. 

Model C340-2 Dual 3'. . . $995.00 ModelC877-1 Single 8'. . . $1095.00 
Model C540-2 Dual 5'... $895.00 Model C877-2 Dual 8' ... $1695.00 

80 COLUMN VIDEO: 

Screenmaker so column video board $179.95 

Give the 64 a screen full of characters. Screenmaker gives a complete 
set of characters (80X24) in a 2K Video RAM. Software to link the system 
is included. 

WORD PROCESSING: 

COPY-WRITER Professional Word Processor $1 45.00 

The next logical step in the evolution of Word Processors. Copy-Writer 
has the features found in the best and more. Double columns, shorthand, 
the works! 

COMMUNICATIONS: 

COM PACK Intelligent Terminal Package $1 29.95 

A complete communications control center- record/read to/from disk- 
convert files ASCII, BASIC, BINARY, MAE- print incoming data. Complete 
with software, port board and cable. 

LANGUAGES: 

full FO RT H + enhanced fig Forth for Commodore 64. . . $ 1 00.00 
Strings, floating point, editor, conditional assembler, interpreter, and 
more are included in fullFORTH +. Target Compiler is also available for 
$50.00 

KM MM PASCAL forCommodore64byWilserve.... $85.00 
One of the newest HL languages, KMMM PASCAL isatruecompilerthat 
generates machine code from PASCAL source. . . FAST! Editor, Compiler, 
Translator included. 

UTILITIES: 

Copymaker single disk backup routine $30.00 

Copymaker allows a 1 541 owner to quickly backup an entire floppy disk 
on ONE DRIVE! Simple swap prompting and full use of memory make this 
easy to use and essential for any disk owner. 

MAE Macro Assembler Editor from EHS $ 99.95 

MAE has become the standard of the 6502 industry by providing the 
power and ease of use needed by the best assembly programmers. MAE 
is a complete development system including a word processor and lots 
of source goodies. 

MICROTECH is your complete 64 center. Dealer inquiries invited. 



(MICROTECH) 



Circle No 6 



P.O. BOX 102 

LANGHORNE.PA 19047 
215-757-0284 
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Program 1 



1 REM PIE GRAPH DEMO 

2 »EM 

:" : REM <C> 1^63 BV 
4 PEM 

3 REM. ERIC: GIOUERE 
£ REM 

7 REM BOX 901, PERCE RIVER 

8 REM ALBERTO CANADA 

9 REM 

10 GRAPH I CI 

J, 4 REM GET Up VARIABLES 

1 5 BEE EHR < Z > * I NT < RUB (. 1 ?*Z5 : K*3 1 1 ! V*5 1 1 : RX=300 : RY**90 : C=3 . 1 4/ 1 80 

17 : 

18 REM CHANGE COLORS 

19 PEM % BRRW CIRCLE 

20 COLORE ■■ 1 , ENR 1 1 S 5 + 1 , ENR (16) + rc I RCLE 1 , X > V , RX » RV 
23 : 

?4 REM BRRW LINE RT DEGREES 
25 T=9 : GOSUB70 : BRRW 1 > X , VTOXK , WV. 

28 : 

29 REM GET RANDOM DEGREE 

30 T=FHR"C350::'+5:GO8UB70 

33 = 

34 REM BRRW DIVISION 

35 CRAWL. X., VTOXK.. Vtf 

■ "? i* • 

"?P : 

3S REM FILL IN CIRCLE 

40 T-T-5 : M= 1 : GOSUB70 : PR I NT3 , X"i , SY. 

,:!.5 t«T+ I O : GOSUB70 : PR I NT2 , XK , VS.- M«0 

48 • 

4$ ^EN PRINT FIRST flRER 

SP T*^5TR* -:; T ) : CHRR0 , , T* : FOR I * 1 TO 1 000 : NEXT 



54 REM CHECK TO SEE IF KEV PRESSED 

55 GETF* '• I Ffl*<> " M THEN = GRAPH I C4 • END 
Sfl SCNCLR : GOTQ20 

67 : 

S8 REM C^LCULRTE X-V 

.-q c ? cr ri POSITION 

7g xsj«><+ < RX-|i?3*i i 90 ) #COS < T*C 5 

75 V5f*V+ C RV--M* 1 00 ::< #s I N < T#C > 

8fi RETURN 
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Program 2 



10 P0KE36S?9,27:PRINTCHR*a42)":M PIE GRAPH 1 
1.5 PRINT"*!! CO 1983 BV E. GIGUERE" ■ PR I NT "3 



?.Q PRINT"V0U WILL BE RSKED TO ENTER fl PERCENTAGE, " 
?3 PR I NT "MR PIE GRAPH WILL THEN BE GENERATED FROM 

THE FIGURE VOU GAVE." 
30 PRINT"fflVQIJ MAV PRESS ANV KEV TO START OVER AGAIN 

WHEN THE GRAPH IS FINISHED. " 
35 PR I NT "WW HIT ANV KEV TO START " 
40 OETfl*: IFR*-""THEN40 

45 P0KE36879,27:PRINT"3S" : IFA*="Q"THENEND 
50 PR I NT "PERCENTAGE TO GRAPH? "; : GOSUB1000 

55 P-INTCIN):IFP<10RP>99THENPRINT I, WRLUE OUT OF RANGE. W '■ DOT 038 
100 GRAPHIC1 : X-503 ■ V«X : RX*300 : RV«=400 : 0=3. 14/180 ' M=0 
110 COLORS* 1* 10,15:CIRCLE1/X,V,RX,RV 
1 20 T«0 •• GOSUB300 : DRAW 1 , X , VTOXX , VK 
1 ?5 T=P*360/ 1 00 = GOSUB300 = DRAW 1 , X , VTOXK .. VY. 
1 30 T=T-5 : M*l : OOSUB300 = PA I NT3 , XX , YK 
1 35 T«T+ 1 = OOSUB300 : PA I NT2 , XX , VX 
14PI S*=MID*CSTR*CP>,2> + " X": REG I ONI 
145 CHRR10,16,S* 

193 WAIT197, 64, 64 : GRAPH I 04 : GETA* : G0T045 
300 XX»X+ >:. RX-M* 1 00 > #COS < T*C > 
3 1 VX~ V+ C R V-M* 1 00 > *S I N C TfO 
320 RETURN 

1 000 OPEN 1,0:1 NPUT# 1 , I m ■ CLOSE 1 : PR I NT = I N= VAL < I N* > ■ RETURN 
READY. 



THE CDI 4C/8C VIDEO CARTRIDGES 

Quantum Data, Inc. produces two 40/80 Video Cartridges for the Commodore VIC-20 computer. The 
Video Cartridge which does not contain memory, and the Video Combo Cartridge which contains 1 6K 
RAM composed of eight 6116 CMOS memory chips. 

The 40/80 Video Cartridge or the 40/80 Video Combo Cartridge is the means to upgrade the 
VIC-20 computer to a 40 * 24 or an 80 * 24 character display. This provides a wealth of new uses 
Por the VIC-20 and with the appropriate soPtware you can now accomplish quality word processing 
and various business Punctions that previously were difficult to achieve with only the VICs standard 
22 character video display. Both Cartridges Peature a screen printing routine and a terminal 
emulator routine which are written in BASIC so that you can add these capabilities to your 
programs. 

€ither Cartridges can be plugged into the memory expansion port oP the VIC-20 or an expansion 
chassis. The 40 character mode may be easily viewed on most standard T.V. sets but a monitor is 
required Por the 80 column mode to provide the necessary additional resolution. 

VIDCO CARTRIDGE $1 59.95 

VIDCO COMBO CRRTRIDGC $259.95 

Call (714) 553-1945 to place your order today! 

j) flsk for other VIC-20 hardware and software peripherals! 




QUANTUM DATA, INC. 

14252 Culver Drive, Suite A, Box 285, Irvine, CA 92714 

Items m stock ready For immediate delivery. 
Visa or Mastercard accepted. Above prices retail in US dollars Shipping and handling not included, 
Circle No 36 VIC -90 fe o trademark of Commodore Q .^oess Machines 
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CREATIVE SOFTWARE 

- the #1 * independent VIC-20 full-line software 

publisher in the U.S. - is proud to announce 

4 new Game Cartridges & 5 Home Applications 

for the COMMODORE 641 



I CREATIVE 
^1 SOFTWARE 



A GAME < 



CREAHVI 
"SOFTWARE 



/ISTROBU7Z 



A GAME ON CARTRIDGE FOR THE COMMODORE 64 - 




A 



^■CREATIVE 



A GAME ON CARTRIDGE FOR THE COMMODORE 64™ 




4 



Joyinot control I #f to^uifvvL 



THIS GAME IS ALSO AVAILABLE FOR THE VIC-20. THIS GAME IS ALSO AVAILABLE FOR THE VIC-20. 




=•=* 



V I0°t? H| 30^ , 





CREATIVE 
SOFTWARE 

A Division of ASCI. Inc. 
230 East Caribbean Drive 
Sunnyvale, CA 94086 



* Based on survey of distributors and retailers. 

Copyright 1983 by Creative Software. All rights reserved. 

"VIC-20," "COMMODORE" and "COMMODORE 64" 
are trademarks of COMMODORE ELECTRONICS, LTD. 



These Home Appli- 
cation Programs 
are also available 
for the VIC-20. 



Technological Innovations for 
the VIC 20 and Commodore 64 



Designed by RAK-Ware 




EXPAND-O-RAiyi 



VIC20 



VIC20 



UNIVERSAL TAPE INTERFACE 



Mo need to purchase an expensive data recorder for your VIC 20™ 
or Commodore 64". The Tymac Universal Tape Interface and 
Duplicator will allow you to toad, save and even duplicate your 
programs and data cassettes with virtually any portable home 
'tape recorder. To insure positive LOADS and SAVES, a special 
audio enhancement circuit is provided in the interface. Three LED 
indicators monitor the status at all times and provide a visual 
indication of loads and saves, A parity switch witl also insure that 
all types of data tapes can be successfully loaded. Operator 
controlled action of the recorder is another desirable feature. 
Finally, you can easily make back-up tapes without the need of 
loading your software back into the computer A unique switch 
function will allow you to make direct recordings to another tape 
-nt duplication device for the user who may want to 
rt a software business at home. The TYMAC UNIVERSAL TAPE 
AND DUPLICATOR is way ahead of the competitors in 
features and quality 



ALL THIS FOR ONLY. 



..S49.QD 



NOTE: Duplication requires the use of Two Standard tape 
recorders. 



micro 
urarE 



DISTRIBUTING INC 

1342 B Rt. 23, Butler, NJ 07405 

201-838-9027 





[*o*t*<C<>r<j]|(EJ?H( 



NOTE We solicit h aid ware , 
purchases can be negotiated 



EXPAND-O-RAM is truly a multifunction memory expansion board 
that provides 2 switch selectable slots to double the capacity of 
your computer. In addition to these important features, a RESET 
button has been provided to allow you to regain control of a 
"hung" or unstoppable program. A bank of mmi-switches control 
memory addressing on the board so that you can use EXPAND-O- 
RAM as a useful tool for cartridge development and debugging, A 
write protect function is even provided so that you can simulate a 
ROM environment or investigate a previously programmed ROM 
Cartridge Pack. A quick summary of the features are as follows: 

A) 16K of additional Memory, 

B) Compatability with additional Memory & Games 
Cartridges. 

C) Two Additional Switch Selectable Slots, 
0) Reset Switch for warm starts. 

E) Slide Switch for easy selection of Cartridges or 
memory packs. * 

F) Switch selectable Memory Map selections of the 
16K memory. 

G) Use as a Program and Cartridge development tool 

H) Write protection of memory area for cartridge simulation 
and investigation, 



ALL THIS FOR ONLY. 



$119.00 



*d» 



Unmmi 
TA PI IFTIB WLCE 
and 





Deafer and Distributor 
inquiries invited 

nd software items lor ihe VIC W and CBW 64' Royalties. 
CBM 64' & tflC 20* af* Registered Trademarks of Commodore 



m fees, or outright 
fflCSS Machines Inc 



Character Editor for Commodore 64 




by Garry G. Kiziak 
Burlington, Ontario 



The characters that are normally 
PRINTed or POKEd to the screen on 
the COMMODORE 64 are stored in 
ROM. There are two different 
character sets, each occupying 2K 
(2048) bytes of memory. 

The GRAPHICS character set (the 
usual uppercase characters and the 
special graphics characters) is enabl- 
ed with a POKE 53272,21 while the 
TEXT set (the lowercase characters) is 
enabled with a POKE 53272,23. 

It is possible to have character sets 
stored in RAM on the 64— actually 8 
sets are possible but only 5 are usable. 
The RAM character sets are number- 
ed to 7. Each set occupies 2K of 
memory and is enabled by poking 
location 53272 with an appropriate 
value. Table 1 contains a summary of 
the locations used by these characters 
sets and the values required to enable 
them. (See Table 1.) 

Character set is not usable since 
this part of memory is used by the 
operating system and screen memory. 
Notice that the pokes that enable 
character sets 2 and 3 in fact enable 
the ROM character sets (The VIC chip 
"sees" the ROM sets in these loca- 
tions even though they are actually 
stored in high memory). Thus 
character sets 0, 2, and 3 are not nor- 
mally usable. I say normally because 
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it is possible to have the VIC chip 
"look" at a different bank in which they 
are usable, but for our purposes we 
shall only consider sets 1,4,5, 6, and 
7 as being available. Since these sets 
are located in the same part of 
memory that a BASIC program nor- 
mally occupies, it may be necessary 
to move your BASIC program up in 
memory whenever you use a RAM 
character set (see [1] for details on 
how this is done). If your program is 
relatively small (6K-12K), relocation 
may not be necessary. In such cases, 
character sets 5, 6, or 7 can be used 
and can even be saved with the 
BASIC program itself (again, see [1 ] for 
details). 

The CHARACTER EDITOR present- 
ed in this article will allow you to 
create, edit, etc. characters in any of 
these five character sets. The char- 
acter sets that you create can be sav- 
ed to disk or cassette for later use in 
your own programs. 

Entering the Programs 

In order to use the Character Editor, 
you will have to type in two separate 
programs, the CHAR BOOT program 
and the CHAR EDITOR program. The 
CHAR BOOT program alters the point- 
ers in zero page so that the Character 
Editor can be loaded above Character 



Set 7. It also stores a short machine 
language program and the data for a 
sprite, used by the editor, into 
memory. Finally, it loads the Character 
Editor into memory and runs it. The 
CHAR BOOT program (listing 1) has 
been listed showing all the cursor con- 
trol characters within square brackets 
to simplify entering the program. 
Cassette users should leave out the 
",8" in line 35 and make certain that 
the CHAR EDITOR program (listing 2) 
is saved immediately after the CHAR 
BOOT program on tape. 

How to Use the Editor 

Once the Character Editor is up and 
running, you will see an 8x8 grid in the 
upper half of the screen, at the left 
hand side. It is called the EDIT GRID. 
On the bottom half of the screen, you 
will see 64 characters enclosed by a 
border, with the label "CHARACTER 
SET 2" at the top, and a box cursor 
flashing over the "@" character. 

There are two distinct modes in the 
editor, Character Selection Mode and 
Edit Mode. 

In Edit Mode, several commands 
are available that allow you to create 
and edit the characters in your 
character set. 

In Character Selection Mode, there 
are commands to help you select the 
character set you want to work with, 
the character you want to edit, as well 
as commands to load and save your 
completed character sets. 

Character Selection Mode 

When you first run the editor and 
see the box cursor flashing over the 
"@" character, you are in Character 
Selection Mode. The label "CHAR- 
ACTER SET 2" reminds you that you 
are presently viewing the first 64 char- 
acters in character set 2, the normal 
Graphics set. As we mentioned earlier, 
this set is in ROM and cannot be 
edited. One of the commands avail- 
able to you in this mode allows you to 
change from one character set to 
another. To do this, press any one of 
the keys 1,2,3, 4, 5, 6, or 7. Pressing 
any of these keys at this time (except 
for 2 or 3) will produce garbage on the 
screen. This occurs simply because 
you don't have any characters stored 
in the necessary RAM locations. Press 



the 2 or 3 key now to make the screen 
readable once again. 

About the only useful command that 
you can use at this time involves press- 
ing the COMMODORE key and the 
"L" key simultaneously. You should 
see the message "LOAD FROM 
ROM" displayed at the top of the 
screen and just below it the prompt 
"GRAPHICS OR TEXT" with the G of 
GRAPHICS and T of TEXT highlighted 
in reverse. Press one of these keys (G 
or T) now. Immediately the program 
will ask you "TO WHICH SET:". 
Answer 1 for the time being (you could 
choose 1, 4, 5, 6, or 7). Immediately, 
character set 1 will be displayed and 
the characters will be loaded from 
ROM into that character set. When the 
flashing box cursor returns, you are 
back in Character Selection Mode and 
ready to proceed. Here are the com- 
mands available to you in Character 
Selection Mode. 

Keystroke / Action 

CRSR-RT, -LFT, -UP, -DWN— 

These keystrokes move the box cur- 
sor to any of the 64 characters 
displayed on the screen. Notice that 
wraparound occurs to the next line 
horizontally and the same column 
vertically. 

Return— This selects the character 
inside the box cursor for editing. The 
character is displayed on the Edit Grid 
in an enlarged format, $nd to the right 
of the Edit Grid, in normal format, in 
each of the 1 6 available colours. At this 
point you are in Edit Mode and you 
can proceed to edit the character on 
the grid. 

CTRL-N— This displays the NEXT 
64 characters of the present character 
set at the bottom of the screen. (There 
are 256 characters in each character 
set, but only 64 are displayed at any 
given time. Pressing CTRL-N four 
times in succession will bring you back 
to the original 64 characters. 

CTRL-P-Displays the PREVIOUS 
64 characters of the present character 

set. 

CTRL-B— Allows you to change the 

BACKGROUND colour of the screen. 

Actually, like the Sprite Editor in [1] it 

steps through the 16 available colours. 

Continued on page 56 





Table 1 




Character Set 


Location 


Enable With 





- 2047 


POKE 53272,17 


1 


2048 - 4095 


POKE 53272,19 


2 


4096 - 6143 


POKE 53272,21 


3 


6144- 8191 


POKE 53272,23 


4 


8192- 10239 


POKE 53272,25 


5 


10240- 12287 


POKE 53272,27 


6 


12288 - 14335 


POKE 53272,29 


7 


14336 - 16383 


POKE 53272,31 



Listing 1 

10 REN 

15 REM CHRACTER EDITOR BOOT 

29 REM 

25 POKE 53280, 14: POKE 53281,6 

36 PR I NT " [ CLEAR ] C UH I TE ] [ DOWN "J C DOWN 3 [ DO 

WN ] C DOWN :i C DOWN 3 C DOWN ] C DOWN ] C DOWN 3 L DOWN 3 

C DOWN 3 1 DOWN 3 C DOWN 3 1 R I OHT 3 C R I GHT 3 C R I OUT 3 

C R I GHT 3 C R I GHT 3 C R I GHT 3 C R I GHT 3 C R I GHT 3E-RI G 

HT 3 [ R I GHT 3 C R I GHT 3 C R I GHT 3 C R I GHT 3 C R I GHT 3 L 

R I GHT 3 LOAD I NG . . . [ DOWN 3 11 DOWN 3 " : GOSUE 1 00 

35 PR I HT " [ HOME 3 C BLUE 3 LOAD " CHR* < 34 ) " CHA 

R EBIT0R"CHR$<34>",8" 

40 FOR 1=0 TO 63 : READ 

FOR 1=0 TO 73: READ 

FOR 1=0 TO 18 : READ 

FOR 1=1 TO 8: READ 



45 
50 
55 



tf :P0KE 704+ I, X: NEXT 
X:P0KE 896+ I, X= NEXT 
X-POKE 976+ I, X: NEXT 

I : POKE 630+1, X : NEX 



1 QQ O 



16*1024, 0:CLR: NEW 
[OFF 3 [REV 3 [OFF 3 
[OFF 3 [REV 3 [OFF 3 
3 [OFF 3 [REV 3 CO 



T 

60 POKE 

65 POKE 44, 64: POKE 
100 PRINT" [REV 3 
[REV 3 [OFF 3 [REV 3 

[REV 3 [OFF 3 [REV 
FF3 [REV 3 [OFF 3 [REV 3 [OFF 3 
110 PRINT" [REV 3 [OFF 3 [REV 3 [OFF 3 
[REV 3 [OFF 3 [REV 3 [OFF 3 [REV 3 [OFF 3 [RE 
V3 [OFF 3 [REV 3 [OFF 3 [REV 3 [OFF 3 [REV 3 
[OFF 3 [REV 3 [OFF 3 [REV 3 [OFF 3 [REV 3 

[OFF 3 [REV 3 [OFF 3 [REV 3 [OFF 3 
120 PRINT" [REV 3 [OFF 3 [REV 3 [OFF]"" 
[REV 3 [OFF 3 [REV 3 [OFF3~[REV3 [OFF 3 [RE 
V3 [0FF3~I [REV 3 [OFF3T.REV3 [OFF 3 [REV 
3 [OFF 3 [REV 3 [OFF 3 [REV 3 [OFF] - C 
REV 3 [OFF in 
130 PRINT" " ~ 



[OFF 3 [REV 3 
[OFF 3 [REV 



140 PRINT" [REV 3 

[OFF 3 [REV 3 [OFF 3 [REV 3 
3 [OFF 3 [REV 3 [OFF 3 
150 PRINT" [REV 3 [OFF 3 [REV 3 

[OFF 3 [REV 3 [OFF 3 [REV 3 [OFF 3 [REV 3 [ 
OFF 3 [REV 3 [OFF 3 [REV 3 [OFF 3 [REV 3 [OF 
F3 [REV 3 [OFF 3 
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Game- CONTEST 




Terms for 
Game Contest 

First prize will be awarded to the 
person with the highest score. The 
winning entry must contain a photo- 
graph of the highest score of the 
game, a Creative Software package 
front and proof of purchase slip. 

Entries must be mailed to Com- 
mander, Creative Software Contest, 
PO Box 98827, Tacoma, WA 98498. 
All entries must be mailed, as 
postmarks are required to determine 
the earliest winning entry. In the event 
of a tie, duplicate prizes will be award- 
ed. Employees of Creative Software 
and their families may not participate. 
First prize will be $250, second prize 
$100, third prize $50. 

The contest will run until a first prize 
is awarded. Creative Software will 
notify Commander Magazine of the 
winner(s). 



The Game Contest is a continuing feature of Com- 
mander Magazine aimed at providing entertainment 
for and promoting competition among our readers. 
Creative Software has graciously provided us with this 
Game Contest. 

DEADLINE FOR ENTRIES- 
AUGUST 1, 1983 

Trashman may be purchased from Creative Software 

or any one of its fine dealers: 

230 East Caribbean Drive 

Sunnyvale, CA 

1-408-745-1655 
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Only COMMANDER will do all this 

GUIDE 



INSTRUCT 

ENTERTAIN 

SIMPLIFY 

INFORM 

Subscribe now and 



Reports that give you hands-on, user oriented information on the entire range of 
Commodore Computers • More comparison charts, diagrams, instructional illustra- 
tions, and how-to photos than any other publication in the field • Articles written 
by the top working experts in the field. 

Innovative ways to use your computer equipment— from self-improvement 
to home security • Valuable tricks and practical advice on how to get the most from 
your investment in the high tech field of computers • In depth and unbiased analyses 
of the latest in educational software. 

Fascinating glimpses into the wonders of the computer future • Profiles of 
the industry's most creative people • Provocative discussions on the impact com- 
puters will have on you and your family. 

Critical comparisons of the Commodore Computers • Exactly how your 
computer equipment works • What those computer "buzz words" mean and ex- 
pensive "special features" do • Useful trouble-shooting & maintenance advice. 

An expanded directory of the latest programs on ROM-PAK, tape and disc 
• New product previews of the latest and best equipment on the market • Exciting 
technologies in development for tomorrow • Important applications of computers 
for health, education, business, and the public good • New directions in computers 
• Much More . . . 

take advantage of our Limited Offer of $4 off the one year subscriptions 




—Subscription Orders Only- 
Toll Free Number: 1-800-426-1830 
(except WA, HI, AK) 

COMMANDER 

PO BOX 98827 
TACOMA, WASHINGTON 98498 

(206) 565-6818 
1 YR. $22 □ 2 YR. $40 

□ 3 YR. $58 

(Prices do not include $4 discount) 
Prices in U.S. Funds 

Washington residents please add 7 8% sales tax 
Allow 5-6 weeks for delivery. 



DON'T MISS OUT 

on the most informative 
magazine dedicated to the 
COMMODORE COMPUTERS 

HAVE YOU GOT WHAT 
IT TAKES TO BE A 



©44NSANDER 
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CTRL-E— Steps through the 16 
EDGE (Border) colours. 

Any of the # keys 1 to 7— Displays 
the corresponding character set for 
editing. Remember that character sets 
2 and 3 can be displayed but cannot 
be edited. 

CTRL-L— Loads a character set 
from disk into memory. You are prompt- 
ed for the FILENAME of the set. If 
it is found, it is loaded into the same 
set (1 , 4, 5, 6, or 7) that it was orginal- 
ly saved to. 

SHIFT-L— LOADS a character set 
from cassette into memory. 

C = -L— LOADS the ROM character 
set that you specify (GRAPHICS or 
TEXT) into the character set that you 
specify. 

CTRL-S— SAVES the character set, 
presently being displayed (edited), to 
disk. You are prompted for a 
FILENAME and the number of the set 
you wish to save that set to. Notice that 
even if you are presently editing 
character set 1, you can save it to 
character set 4, 5, 6, or 7 if you wish. 

SHIFT-S— SAVES the character set 
presently being edited to cassette. 

CTRL-K— Allows you to select a 
character for editing by pressing the 
corresponding key (rather than by 
moving the box cursor to it and press- 
ing RETURN). As soon as CTRL-K is 
pressed the message "WHICH KEY" 
is displayed on the screen. Press 
RETURN and you are back in Char- 
acter Selection Mode. (Do this if you 
pressed CTRL-K by accident or if you 
have changed your mind.) Pressing 
any other key on the keyboard will 
display that character on the Edit Grid 
and put you in Edit Mode. Shifted 
characters and characters obtained by 
first pressing the COMMODORE key 
can be selected by this means- 
control characters, of course, cannot. 
Even reverse video characters can be 
selected by preceding the key of your 
choice with the RVS (actually CTRL-9) 
key. 

I found this method of selecting a 
character useful when I attempted to 
create a wide (i.e. double width) 
character set. Each character in this 
set is actually two characters. I found 
it convenient to store the left half of a 
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168 PRINT" [REV] [OFF J" [REV] 

[OFF] [REV] [OFF] [REV] [OFF] [REV] [ 

OFF] [REV] [OFF] [REV] [OFF] [REV] [OF 

F]~l 

170 PRINT" — " "~~~ ~ 

" [HOME] 

180 RETURN 

1 000 DRTfl 255 , 255 , 8 , 255 , 255 , 8 ,132,3,0,1 

92,3,0, 192,3,0, 192 

1010 BfiTfi 3 , , 1 92 , 3 , 8 , i 92 , 3 , , 1 92 , 3 , © , 1 

92,3,0, 192,3 

1 028 DRTfl , 1 92 , 3 , , 1 92 , 3 , , 255 , 255 , , 2 

55,255,0,0,0,0 

1 030 DRTFl , , , , , , , 8 , , 8 , , , 8 , 8 , 
, 

1 040 DRTfl 1 68 , 7 , 1 77 , 25 1 , 1 62 , 8 , 42 , 62 , 1 57 

, 3 , 232 j 224 , 8 , 288 , 247 , 1 36 

1 858 DATA 1 6 , 248 , 1 60 ,7,1 85 , 1 57 , 3 , 1 45 , 25 

1 , 136, 16, 248, 96, 234, 234, 234 

1 060 DRTfl 234 , 234 , 234 , 234 , 234 , 1 63 , 1 48 , 1 

33 , 25 1 , 1 63 ,5,1 33 , 252 , 162,7,1 60 

1070 DRTfl 7,169,46,126,157,3,144,2,169, 

81,145,251,1 36 ,16, 242 , 56 

1080 DRTfl 165, 251 , 233, 40, 133, 251 , 165, 25 

2 , 233 , 8 , 1 33 , 252 , 202 ,16, 224 , 96 

1 090 DRTfl 162, 8 , 1 60 , ,177, 25 1,145, 253 , 2 

00 , 203 , 249 , 230 , 252 , 230 , 254 , 202 , 288 , 242 , 

96 

2000 DATA 19,13, 32 , 32 , 82 , 85 , 78 , 1 3 

READY. 



Listing 2 

1 00 PT= 1 60 i P8KE 953 , PT : X 1 =52 ■ V 1 = 1 66 ■ I F 

V=8 THEN GOSUB 1120 

110 PRINT LEFT*<V$,5>TflBa8>LEFT$'::BL$,9 

\ 

120 PRINT'.PRINT TRBa8)LEFT$'::BL$, 16) 

130 GOSUB 610: GOSUB 1160: GOSUB 620:GO3U 

B 860: GOSUB 650 

140 FOR 1=0 TO 7:P=PEEKCL+I>:P0KE Z+I,P 

: NEXT 

150 GOSUB 570 :X=0:V=0: GOSUB 590 

160 P=l 148+X+V*40 = Q=PEEK<P> : R=Q 

1 70 R= ( NOTRRNB 1 28 > OR C NOT 1 28RNDR ) 

180 POKE P,R 

190 FOR 1 = 1 TO 30: GET R$:IF R$="" THEN 

NEXT: GOTO 170 

208 POKE P,Q 

210 IF R$=" [RIGHT]" THEN X=>:X+1 >RND7:G0 

TO 160 

228 IF fl$="[L_EFT]" THEN X=<X-1)RND7: GOT 

160 

230 IF fl$="[DOUN]" THEN V=CV+l)flND7 : GOT 

160 



character in its normal location (e.g. 
the A key) and the right half of the 
character in the shifted character (i.e. 
the SHIFT-A key). Trying to select a 
key by moving the box cursor to it 
each time was very time consuming 
and error prone, especially when 
some characters are so similar in ap- 
pearance (e.g. SHIFT-H and SHIFT- Y). 

Q— QUITS the editor. Once you 
have quit the editor, you may restart 
it, with all the characters in tact, sim- 
ply by typing RUN. The CHAR BOOT 
program does not have to be reload- 
ed and run. Note: Some of these com- 
mands do not work when viewing 
character set 2 or 3 since these sets 
cannot be edited. 

Edit Mode— Once the character 
you have selected is displayed in the 
EDIT GRID, there are a number of 
commands available that simplify the 
creation or editing of this character. If 
you typed in the SPRITE EDITOR in [1 ] 
then you will find that the following 
commands work in exactly the same 
way. 

CLR— Clears the edit grid (and the 
character being edited). 

HOME— Places the cursor in the 
upper left corner (the home position) 
without affectng anything else on the 
screen. 

CRSR-RT,-LFT, -UP, -DWN- 

Used to move the flashing cursor 
around the edit grid without affecting 
anything else on the screen. 

.—Turns the block under the 
flashing cursor (and the corresponding 
pixel of the character) on. 

SPACE— Turns the block under the 
flashing cursor off. 

DEL— Turns the block to the left of 
the cursor off (taking into account 
wraparound). 

RETURN— Moves the cursor to the 
beginning of the next line. 

F1 ,F3,F5,F7— Moves the entire 
grid up, down, left, or right one line or 
column. 

CTRL-R-REVERSES the entire 
grid (and character). 

CTRL-B— Changes the BACK- 
GROUND colour of the screen. 
CTRL-E— Changes the EDGE 



240 IF Fr^'CUP]" THEN V=(V-1 )RHD7 : GOTO 168 

25S IF m~m$ THEN X=<X-1 )RND7 : P=l 148+X 

+Y*40:POKE P,46:T=Z+V 

260 IF fl*=DE* THEN POKE T, PEEKCT)fiNDH<X 

><GOT0 160 

270 IF fl*=" " THEN POKE F\. 46 : T=Z+V ' POKE 

T\PEEK(T>flNDHCX> : X=<X+1 >fiHD7 : GOTO 160 
280 IF fl$="." THEN POKE P, PT : T=Z+V ' POKE 

T 4 PEEK < T > ORM C H ) : X= ( X+ 1 ) RMD7 : GOTO 1 60 
290 IF fl*=" [CLEAR]" THEN GOSUB 620 : GOSU 
E 640 :X=0:V=@: GOTO 160 

300 IF R$="Q" THEN GOSUB 620 : GOSUB 640 : 
DC=32= GOSUE 590 ' DC«255 '• GOSUB 650 : GOTO 140 
310 IF ftS^HOttEr 1 THEN X=0:Y=0:GOTD 16 

320 IF fi$=CR$ THEN X=8 : V=(V+1 >HHD7 : GOTO 

160 
330 IF R** u «" THEN FOR 1 = 1 TO 7 ■ POKE Z+ 
I-1,.PEEK(Z+I>: NEXT: POKE 2+7,0: GOSUB 570 
340 IF RtB B r THEN 168 

350 IF R*= H «" THEN FOR 1=7 TO 1 STEP «1 
'■ POKE Z+ 1 , PEEK ( Z+ 1 - 1 > : NEXT : POKE Z , 
360 IF fl*="i" THEN GOSUE 570 : GOTO 168 
378 IF R*»"ir THEN FOR 1=0 TO 7 : POKE Z+ 
1 1 C PEEK •:: Z+ 1 ) *2 ) RND255 : NEXT 
380 IF fl$="ir THEN GOSUB 578 : GOTO 160 
398 IF R$*="lt" THEN FOR 1=6 TO 7 : POKE Z+ 
I,(PEEKc;z+I)/2>:NEXT 

400 IF fi$="ll" THEN GOSUB 570 ' GOTO 160 
410 IF R$= N CREV] M THEN FOR 1=8 TO 7 ■ R=P 
EEK C Z+ 1 ) : R= ( N0TRRNB255 > OR ( N0T255RNDR > 
420 IF fl*="[ REV]" THEN POKE Z+I,R:NEXT: 
GOSUB 570: GOTO i$@ 

430 IF R*="iS" THEN BG=<BG+1 > AND 15 : POKE 
5328 LEG: GOTO 168 

440 IF H*= M [WHITE]" THEN BR=<BR+1 ) AND 15 
:POKE 53280, BR: GOTO 160 
442 IF fl*="H"RNDY<7 THEN FOR 1=7 TO Y+l 

STEP-1 : POKEZ+I > PEEK<Z+I-1 > : NEXT : POKEZ+ 

444 IF fl$="-H"flNIJY<7 THEN GOSUE 570: GOTO 

168 
446 IF R** ,k lfl"flHBV<7 THEN FOR I«Y TO 6:p 
0KEZ+ 1 , PEEK (2+1+1 > : NEXT : P0KE2+7 , 

448 IF fl*="il] ,, flHD , T , <:7 THEN GOSUB 570 : GOTO 
160 

449 IF < fl$="H"ORfi$="n]" > flHD Y=7 THEN POKE 
2+V.0: GOSUB 570: GOTO 160 

450 IF fi$="£" THEN GOSUB 580: GOSUB 570: 
GOTO 160 

455 IF fl$="a" THEN FOR 1=0 TO 3:22=PEEK. 
(Z+I > : POKEZ+I > PEEK(Z+7-I > = P0KEZ+7-I , Z2 : 
NEXT 

456 IF fi$="S" THEN GOSUB 570 -GOTO 160 
460 IF fi$0"*T AND fl*0"«" THEN 160 
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(Border) colour of the screen. 

CTRL-F— FLIPS the character up- 
side down. 

£— (The pound key) ROTATES the 
character 90 degrees. 

CTRL-I— INSERTS a blank line at 
the current cursor position, moving 
everything on or below this line down. 

Additonal Commands 

CTRL-D— DELETES the line at the 
current cursor position, moving every- 
thing below this line up and blanking 
out the bottom line (like CTRL-K in the 
SPRITE EDITOR). 

CTRL-A— Allows you to ASSIGN 
the character being edited to some 
character in the character set. When 
CTRL-A is pressed, the box cursor will 
flash over the character originally 
selected. The edited character can be 
assigned to this character or to another 
character by first using the cursor keys 
and/or CTRL-N or CTRL-P to position 
the box cursor over the desired char- 
acter and then pressing RETURN This 
approach is most useful when creating 
a character set the first time. As you 
create a character, you assign it to its 
original position and then move on to 
the adjacent character. 

CTRL-K— Allows you to assign the 
character being edited to some 
character by pressing the desired key. 
This command works in exactly the 
same way as in Character Selection 
Mode. (See the comments there to see 
when this method might be more 
useful than CTRL-A.) 

Q— Pressing Q in Edit Mode allows 
you to reenter Character Selection 
Mode without assigning the edited 
character to any character in the 
character set. The edited character is, 
however, lost. 

Some Comments 

1)A command to flip a character 

sideways was not included since this 
can be achieved quickly by first flipp- 
ing it upside down and then rotating 
it 180 degrees (i.e. press CTRL-F, then 
the "£," key twice). 

2) The changes made to any 
character being edited are always 

58/Commander June 1983 



464 REM 

465 REM * * 

466 REM * ASSIGN CHARACTER BEING * 

467 REM * EDITED TO fi KEV * 

468 REM * * 

469 REM **************************** 

470 PR I NT " [ HOME 3 C DOWN 3 E DOWN ] C DOWN 3 C DOW 
N 3 C DOWN 3 C DOWN 3 C DOWN ] [ R I GHT ] C R I GHT 3 C R I OH 
T3 [RIGHT] [RIGHT] [RIGHT] tRIGHT] [RIGHT] [R 
IGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] ASSIGN 
TO 

480 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
RIGHT] [RIGHT] WHICH 
490 IF A$="!T THEN PRINT "[RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[ R I GHT ] [ R I GHT ] [ R I GHT ] t R I GHT ] CHAR ACT 
ER " : FK=2 : GOSUB 66Q ■ FK=0 
500 IF A*="a" THEN PRINT "[RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[ R I GHT ] [ R I GHT ] [ R I GHT ] C R I GHT ] KEV 

" : GOTO 1 400 
510 FOR 1=6 TO ?■ POKE l_+ 1 , PEEK (. 2+ 1 > = NEX 
T: GOSUB 540 

520 IF LOZ THEN GOSUB 640 
530 GOSUB 650 : GOTO 140 

540 PR I NT " [ HOME 3 [ DOWN 3 E DOWN 3 [ DOWN 3 [ DOW 
N 3 [ DOWN 3 [ DOWN 3 E DOWN 3 " ; ■■ FOR 1=0 TO 2 = PR I 
HT TABU 7>" " : NEXT : RETUR 

N 

565 REM **************************** 

566 REM * * 

567 REM * PRINT CHARACTER ON GRID * 

568 REM * * 

569 REM **************************** 

570 FOR 1=0 TO 7: POKE 925+1, PEEK CZ+I> = N 
EXT: SYS 933: RETURN 

575 REM **************************** 

576 REM * * 

577 REM * ROTATE EDIT CHARACTER * 

578 REM * * 

579 REM **************************** 

580 H I = I NT i 2/256 > : L0=Z-256*H I : POKE 25 1 , 
LONOKE 252, HI: SYS 896 'RETURN 

584 REM **************************** 

585 REM * * 

586 REM * PRINT EDIT CHARACTER * 

587 REM * IN ALL 16 COLORS * 

588 REM * * 

589 REM **************************** 

590 J=0:FOR 1=0 TO 15:K=IAND7:IF K=0 TH 
EN J=J+80 



made in a buffer, not to the character 
itself. (Notice you don't see the 
character that you are editing chang- 
ing on the bottom half of the screen, 
only the characters to the right of the 
Edit Grid.) This buffer is actually the 
last character of the character set. This 
means that if you want to have a char- 
acter in this position in your final char- 
acter set, then you must make certain 
that it is the last character you edit 
before saving that set to disk or tape. 

3) The Save routine (either to disk or 
tape) saves the entire character set 
(2048 bytes). In some cases, you 
might want to save just part of the 
character set. I did not include this 
feature in the program simply because 
I didn't find a need for it. If you do, you 
can add this feature quite easily, or 
simply quit the editor (by pressing Q) 
and make appropriate changes to line 
1 080 or line 1 880. Then rerun the pro- 
gram and save the partial character 
set. When working with disk, this will 
cause no problem at all, however, 
when working with cassette, if you 
wish to reload the partial character set 
for further editing, you will also have 
to change line 21 05 in the load routine 
accordingly. 

4) For cassette users, it would be 
totally impractical to have a complete 
character set stored in DATA state- 
ments so you have to either use the 
DATA file approach or save the char- 
acter set as part of your BASIC pro- 
gram. Disk users can load a character 
set just like a Sprite Table. (See [1 ] for 
details.) 

5) In some circumstances, it might 
be practical to store a partial character 
set in DATA statements, Therefore 
listing 3, is a short program (CHARS 
TO DATA) that will perform the 
necessary conversion (it will even do 
an entire character set if you wish). 
With the character set in memory (e.g. 
after pressing Q in the Character 
Editor), load and run this program. 
You will be asked for the starting line 
number for the DATA statements, the 
increment, the number of the char- 
acter set (1 ,4,5,6,7), the number of the 
character in that set at which to begin 
(0 to 255), and the number of char- 
acters to convert. After the conversion 



600 POKE CL+2*K+J+54272,I=P0KE CL+2*K*J 
, DC : NEXT : RETURN 

605 rem %mmmwMmmmmm*mm*m* 

686 REM * * 

697 REM if: CHANGE CHARACTER SET * 
688 REM * * 

609 rem mmmmmmmmmmmmmm 

610 CB=CS*2048:'Z=CB+255*8 : POKE V+24, 17+ 
2*CS : RETURN 

615 rem mmmmmm#mmmmmmmw. 

616 REM * * 

617 REM * PRINT GRID * 

618 REM * * 

613 rem mmmmmm:*mmmmmmm# 

620 PRINT " CHOME'J [DOWN] C DOWN 3 [RIGHT] [RI 
GHT] [RIGHT] [REV] w—mmmmmm [OFF] " : FOR 1 = 
1 TO 8: PRINT " [RIGHT] [RIGHT] [RIGHT3I . . . 

[REV 31" =HEXT 

630 PRINT n [RIGHT][RIGHT][RIGHT][REV] "[ 
OFF] i i ■[REV]" " = RETURN 

635 REM *mmmmm%m$*mmmmmm 

636 REM * * 

637 REM * CLEAR EDIT CHARACTER * 

638 REM * * 

639 rem wmmmmmmmmmmmmm 

640 FOR 1=0 TO 7 -POKE 2+1,0 'NEXT: RETURN 

644 rem mmmmmmmmm%mmmm# 

645 REM * * 

646 REM * SELECT A CHARACTER * 

647 REM * FOR EDITING * 

648 REM * * 

649 rem mmmmmmmmmmmmmm 

650 POKE V+21,0:PGKE V+16,FL=P0KE V, XT- 
POKE V+1,V1 
€6Q R«0 

670 R=1-R'.P0KE V+21,R 

680 FOR 1 = 1 TO 20: GET R*:IF fl*= ,Ml THEN 
NEXT: GOTO 670 

690 POKEV+21 , 1 : A=VAL<A*> : IFA>QAHDA<8AND 
FK=8THENCS=A = G0SUE6 1 : POKE 1 570 , CS+ 1 76 : G 
OTO670 

700 IF A$= M ia" AND FK«8 THEN BG=<BG+1)AN 
BIS -POKE 53281, EG: GOTO 670 
710 IF A*=" [WHITE]" AND FK=8 THEN BR=<B 
R+OAHD15:P0KE 53280, BR : GOTO 67Q 
720 IF A*="BI" THEN TT=(TT+1 >AND3 : GOSUB 
860: GOTO 670 

725 IF A*»"Sr THEN TT=<TT-1 )AND3= GOSUB 
860 : GOTO 670 
730 IF A*="Q" AND FK=8 THEN POKE V+21,0 

: PR I NT "[CLEARS"; =EHD 

735 IF fl$~" I" AND Fk>0 THEN POKE V+21,9 

: GOSUB 1600: GOTO 670 

740 if A$= n r AND FK=6 THEN POKE V+21,0 

: GOSUB 880: GOTO 670 
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is complete, delete lines 0-1 2 and save 
the resulting DATA statements. You 
can then append these DATA 
statements to any BASIC program in 
which you wish to use those 
characters (see below). 

Appending a BASIC Program 

Appending one BASIC program to 
the end of another can be done quite 
easily on the 64. Here are the steps 
required. 

1) Make certain that the program to 
be appended has line numbers 
greater than the largest line number in 
the other BASIC programs. (The 
CHARS TO DATA program allows you 
to choose the starting line number for 
the DATA statements so this should be 
no problem.) 

2) Turn the computer off and then 
on again to make certain that certain 
pointers have not been altered by the 
previous program that you used. Then 
load the original program into 
memory. 

3) In direct mode, type 
PRINT PEEK(45) 

If this number is or 1, then add a 
dummy line (such as REM) to your 
program and repeat step 3. 

4) Again in direct mode, type 
POKE 43,PEEK(45)-2:POKE 44, 

PEEK(46):CLR 

5) If you try to list your programs, 
nothing will list, but it is still there- 
hidden. Now load in the program to be 
appended. After loading, you can list 
that program but the original is still not 
there. 

6) Now type in 

POKE 43,1 POKE 44,8:CLR 
The original program should now list 
along with the appended program. If 
you had to type in a dummy line in 
step 3., delete it now and save the 
resulting program to disk or tape. 

References 

[1]A SPRITE EDITOR FOR THE 
COMMODORE 64— by Garry G. 
Kiziak, Volume 1, Issue 3 (February 
1983) of the COMMANDER. 
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742 IF R$="L" AND FK=0 THEN POKE V+21,0 

:G0SUB 1980: GOTO 670 

745 IF CS=2 OR CS=3 THEN 670 

750 IF A*="[ RIGHT]'* THEN Z1 = (Z1 + 1 >ANB63 

760 IF fl*="[LEFT3" THEN Z1 = <:Z1-1 >AND63 

770 IF A$="[IJp]" THEN Z1»<Z1-16)HND63 

730 IF A*="[D0WN]" THEN Zl=<Zl+16>flND63 

785 IF A*="3I" AND FK=0 THEN FK=1-G0TQ 1 

400 

730 IFA$=CR*THENGOSUB540 = GOSUE620 : DC=32 

: GOSUB590 : HC=255 : P=Z1+TT*64 : L=CB+P*8 : RETURN 

810 IF fl$="[H0ME]" AND FK=0 THEN POKE V 

+21,0:GOSUB 970 : GOTO 670 

815 IF A$="#" AND FK=0 THEN POKE V+21,0 

=G0SUB 1770: GOTO 670 

820 V1 = INT-;Z1/16> :X1=Z1-V1*16:V1 = 166+16 

*V1 

830 

840 

1 

850 POKE V+16,FI_:F0KE V, XI : POKE 

POKE V+21, 1 -GOTO 670 

860 J=1548:FORI=0TO63:K=IAND15 : IF K=0 

J=J+80 

POKE 2*K+ J i I +TT*64 = NEXT : RETURN 

REM 



POKE V+21,0 
IF XK13 THEN 
IF Xl>12 THEN 



X 1 =52+X 1*16: FL=0 : GOTO 850 
X1=-12+-::X1-12;''*16:FL= 



V+1,Y1 



T 



HEN 
870 
874 
875 
876 
877 
878 
879 
880 



REM 

REM 
REM 
REM 
REM 



LOAD A CHARACTER 
FROM DISK 



SET 



PR I NT " [ HOME ] t R I GHT ] C R I GHT ] [ R I GHT ] C 
RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] CRIGH 
T] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [R 
IGHT] [RIGHT] [RIGHT] [RIGHT] 

il 

890 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
RIGHT] [RIGHT] [RIGHT] [REV] LOAD 

[OFF]" 
900 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
RIGHT] [RIGHT] [RIGHT] [REV] FROM DISK 

[OFF]" 
910 LI=7:C0L=18:LE=16: PRINT LEFT$<V$,5> 
TABUS) "FILENAME:" 

920 MSG$="[OFF][OFF]":GOSIJB 1230:FL$="0 
:"+IN$ 

930 IF IN$="" THEN PRINT LEFT* CV*. 5) TAB 
US)" ":G0SUB 1160: RETURN 
940 OPEN 1,8, 15," 10" 

950 OPEN 2,8,0,FL*:GOSUE 1340:CLOSE2:CL 
0SE1 
960 LOAD FL$,8,1 



964 
965 
366 
967 
968 
969 
976 



JflVE R 



REM *#**##»«#**#3|E*#*##**«###***# 

REM 
REM 
REM 
REM 

REM 
PRINT 



* 
* 

* 



CHARACTER SET 
TO DISK 



[ HOME 3 [ R I GHT ] C R I GHT 3 C R I GHT ] C 
RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGH 
T] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [R 

IGHT] [RIGHT] [RIGHT] [RIGHT] 

980 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
R I GHT ] [ R I GHT ] [ R I GHT ] C REV ] SAVE 

[OFF]" 
99& PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
RIGHT] [RIGHT] [RIGHT] [REV] TO DISK 

[OFF]" 
1600 LI=?:C0L=18:LE=16: PRINT LEFTSC V* 
>TRE aS> "FILENAME:" 
1010 MSG$= " [ OFF ] [ OFF ] " = GOSUB 
0:"+IN*+",PRG, WRITE" 
1020 IF IN*="" THEN PRINT 
Bag)" " : GOSUB 11 60: RETURN 

1 030 L I =9 : COL- 1 9 : LE= 1 i MSG*= " C OFF ] S A 
SET? [ OFF ] " : GOSUB 1 230 : TS=V AL ( I N$ ) 
1040 IF TS<1 OR TS=2 OR TS=3 OR TS> 
EN 1030 



5 



1230 :FL$*' 



LEFT$<V*,5: 



Tfl 



,'E T 
' TH 



1050 
1060 
1070 
1 080 



OPEN 1,8, 15," 10": GOSUB 1348 



OPEN 2,8, 1,FL$: GOSUB 1348 
PR I NT#2 , CHR* <. ■) i CHR$ ( 8*TS > 1 
FORI-0TO7 : K=CB+256*I : FOR,T=8T0255 : P 

R I NT#2 , CHR* < PEEK C K+J ) ) ; : NEXT : GOSUB 1 348 : 

NEXT : CL0SE2 

1 090 CLOSE 1 : PR I NT LEFT* i V* , 5 > THE (18) LEF 

It i BL$ , 9 > : PR I NT : PR I NT TAB < 1 8 > LEFT* C BL$ , 

16) 

1100 PRINT LEFT$(V*,9)TFlBC18)LEFT$'::BL*, 

18): GOSUB 1160 

1110 RETURN 



1114 
1115 
1116 
1117 
1118 
1119 



REM 
REM 
REM 
REM 
REM 
REM 



INITIALIZE VARIABLE? 
AND ENABLE CURSOR 



* 
if. 
* 
* 



1120 



PR I NT " [ CLEAR ] [ WH I TE ] " : V=53248 = CL= 
1024+5*40+18 = DC=255 : CS=2 
1 1 30 V*= " [ HOME ] [ DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN ] 
[ DOWN 3 [ DOWN 3 C DOWN 3 i DOWN 3 [ DOWN 3 [ DOWN 3 C DO 
WN 3 [ DOWN 3 [ DOWN 3 [DOWN 3 [ DOWN 3 [ DOWN 3 [ DOWN 3 
[DOWN 3 [DOWN 3 [DOWN 3 [DOWN 3 [DOWN 3 [DOWN 3 [DO 
WN3" :BL*=" 
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POKE 5327 1,0= POKE 532 

CR$=CHR$<13> 

M<I>=2K7-I>:HU>=255 



1140 POKE 2040,11 
77,0:DE$=CHR$C20> 
1150 FOR 1=0 TO 7 
-M-::i>: NEXT: RETURN 

1155 REM **************************** 

1156 REM * * 

1157 REM * SCREEN HISPL.HV * 

1158 REN * * 

1159 REM **************************** 

1160 PRINT "[HOME] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
RIGHT] [RIGHT] " 

1170 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [REV] CHARACTER [OFF] " 
1130 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [REV] EDITOR [OFF] " 
1 1 90 PR I NT LEFT* i V$ , 1 3 > THE < 1 1 > " 



1 200 PRINT " [ P. I GHT ] [ R I GHT ] mamm ^ mmm a REV 

] CHHRHCTER SET"CS" [LEFT] [OFF] 

m" 

1210 FOR 1=1 TO 9: PRINT "[RIGHT] [RIGHT] 

[REV]I [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGH 

T] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [R 

IGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT 

] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 

GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 

[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG 

HT]|":NEXT 

1220 PRINT "[RIGHT] [RIGHT] "[REV] 

rL "- ,M| - n " = RETU 
RN 

1225 REM **************************** 

1226 REM * * 

1227 REM * INPUT ROUTINE * 
1223 REM * * 

1229 REM **************************** 

1230 Y9=2: IN$="" :IJC=0:IJB$=LEFT$CBL$,LE> 
:GOSUE 1330:UB$=" ":UC=3 

1240 UT=TI 

1250 GET Z9$:IF Z9$="" THEN 1310 

1268 IF Z9$=CR* THEN V9=2:G0SUB 1330: PR 

INT "[LEFT] [LEFT] ": RETURN 

1270 IF Z9$=BE$ THEN ON -aEN<JM*>=8> G 

OTO 1310:1 N*=LEFT$ < I ti$ , LEN < I H$ ) - 1 > : GOTO 

1310 

1280 IF <RSC<Z9*> AND 127X32 OR Z9$=CHR$ 

(34) THEN 1310 

1290 IF LE=LENON$> THEN 1310 

1300 IN$=IN$+Z9$ 

1310 GOSUB 1330: IF TI-UTC10 THEN 1250 



62/Commander June 1983 



CoflPU SenSeo 1 



C-64 

VIC-20® 

VIC-1515 

VIC-1530 

VIC-1541 

VIC-1010 

VIC-1311 

VIC-1312 



VIC-1210 



$399.00 

147.00 

334.95 

67.50 

347,00 

139.95 

9.95 

19.95 

99.95 

34.95 

total. 

52.50 

119.95 
39.95 

Provides interface between the VIC-20 and RS232 telecommunications 
modems. Connects to VIC's user port. 

PETSPEED - Basic Compiler tor Commodore 140.00 

Compile any Pet Basic program. The only optimizing compiler. Programs 
compiled with Petspeed run up to 40 times faster. Petspeed code is uniistable 
and compiled programs cannot be tampered with. No security device required 
for compiled programs. Available NOW for the Commodore 64. 

Star Gemini 10 Printer 360 00 

Star Gemini 15 Printer 450.00 

SND Monitor 347 00 



Compute 

Personal Computer 

Printer 

Datasette 

Disk Drive 

Expansion Module 

Joystick 

Game Paddles 

Telephone Modem 

VIC 3K Memory Expander Cart, 

Plugs directly into the VIC's expansion port. Expands to 8K RAM 

VIC-1110 VIC 8K Memory Expander Cart 

8K RAM expansion cartridge plugs directly into the VIC. 

CM 102 24K Memory Expander Cart. 

VIO1011A RS232C Terminal Interface 



CS1 QUICK BROWN FOX $55.00 

The Word Processor of this decade! For the VIC-20 and C-64. 



COMMODORE SOFTWARE 
V1C-1211A VIC-20 Super Expander $55.00 

Everything Commodore could pack into one cartridge - 3K RAM memory 
expansion, high resolution graphics plotting, color, paint and sound com- 
mands. Graphic, text, multicolor and music modes. 1024x1024 dot screen 
plotting. All commands may be typed as new BASIC commands or accessed 
by hitting one of the VIC's special function keys. Includes tutorial instruction 
book. Excellent for all programming levels. 

VIC-1212 Programmer's Aid Cartridge $45.99 

More than 20 new BASIC commands help new and experienced programmers 
renumber, trace and edit BASIC programs. Trace any program line-by-line as 
it executes, pause to edit. Special KEY command lets programmers redefine 
function keys as BASIC commands, subroutines or new commands. 

VIC-1213 VICMON Machine Language Monitor $48 99 

Helps machine code programmers write fast, efficient 6502 assembly lan- 
guage programs. Includes one line assembler/disassembler. 



CARDCO 

Atari Adapter- play your 2600 games on the VIC-20 $79.95 

CARDBOARD 6 $87.50 

An expansion interface for the VIC-20. Allows expansion to 40K or accepts up 
to six games. May be daisy-chained for more versatility. 

CARDBOARD 3 $35.95 

Economy expansion interface for the Vic-20. 

CARD "?" CARD/PRINT $76 00 

Universal Centronics Parallel Printer Interface for the VIC-20 or CBM-64. Use 
an Epson MX-80 or OKIDATA or TANDY or just about any other. 

CARDETTE $30 95 

Use any standard cassette player/recorder with your VIC-20 or CBM-64. 

LIGHT PEN $29.95 

A light pen with six good programs to use with your VIC-20 or CBM-64. 

16K Memory Expander 

All CARDCO Products have a lifetime warranty. 



BUSINESS USES FOR YOUR VIC-20® 
ss 

CW-107A 

CPV-31 

CPV-96 



CPV-208 

CH 

CH 

CH 



CT-21 
CT-121 

CT-124 
CT-125 
CT-126 
CT-140 
CM-152 
CQ-5 



CS 
CS 
CS 



Accounts Payable & Receivable 
Home Calculation Program Pack 

Data Files - your storage is unlimited 

Household Finance Package - to 

keep records of all your household expenses 

Bar-Chart - display your numerical data 

Turtle Graphics - learn programming 

VIC Forth - a powertul language lor 

BASIC programming 

HES MON - a 6502 machine language 

monitor with a mini-assembler 

HES Writer - time-saving word process tool 

EnCOder - keep your personal records 

away trom prying eyes 

Statistics SadistiCS - statistical analysis 

Total Time Manager 2.0 - creates 

personal or business schedules 

Totl Label - a mailing list & label program 

Totl Text BASIC 

Research Assistant - keep track of data 

Totl Text Enhanced 

GrafiX Designer- design graphic characters 12.95 
Minlmon - allows you to program, load. 13.95 

save, or execute machine language programs 
Home Inventory - lists your belongings 17.95 

Check Minder- keep your checkbook right 14.95 

General Ledger - a complete ledger 19.95 



$29.95 
48.95 
14.95 
30.95 


8.95 
34.95 
49.95 


34.95 


34.95 
34.95 


14.95 
15.95 


13.95 
15.95 
17.50 
29.95 



GAMES FOR YOUR VIC-20® 

Tank Wars $15.95 

Pinball 13.45 

Simon- It gets tougher as you get better. 13.45 
Great for kids of all ages. 

Fuel Pirates 13.45 

Laser Blitz 15.95 

Tank Trap 15.95 

Concentration 13.45 

Dam Bomber - pilot the plane, avoid enemy 1 3.45 

ShamUS - search room after room for the 34.95 



CH-G203 
CH-G205 
CH-G206 

CH-G207 
CH-G209 
CH-G210 
CH-G211 
CH-G212 
CH-C307 



shadow-eluding androids; 2 levels of intense arcade action 



CH-C308 Protector 36.95 

CPU-79 Breakout 7.95 

CPU-85 Hangman - unbelievable graphics & sound 9.95 

CPU-87 Memory - VIC challenges your memory 9.95 

CPU-88 Match - hand & eye coordination 7.95 

CPU-89 MonkS - a devilish game of logic 7.95 

CPU- 1 08 Bomber - you must decide who you want to fly 9.95 

for, then pick a target & your experience level 
CPU-1 09 Amok - the halls of Amok are populated by 20.95 

robots that obey one command - get the intruder! 
CPU-1 53 Tank VS. UFO - the tank is moving back & 9.95 

forth along the base; shoot the UFO before it shoots you 

CPU-194 Snakman - PacmanforiheVIC 14.95 

Defender On Trl - you're the pilot of an experimental ship 1 7.95 

$50.50 3"D Man - the popular arcade game, requires 3K 1 7.95 

Exterminator - a game full of bugs 20.95 



We have over 400 programs for your VIC-20 
and over 250 programs for your C-64! 



Shipping & Handling Charges: 

First two (2) items - $2.00 per item. 

Three (3) or more items - $1.00 per item. 

For orders over $100 total, surface shipping will be paid by 

CompuSense. Blue Label or special handling will be paid by 

the customer. 
Additional $2.00 C.O.D. fee on all C.O.D. orders. 
MasterCard and Visa accepted. Give card number and expiration 

date on order form. 
Allow three (3) weeks for personal checks. 

TO ORDER: 



Write for 



P.O. Box 18765 C 
Wichita, KS 67218 

(316)263-1095 

Prices subject to change. 
VIC-20® is a registered trademark of Commodore 




Catalog! 



Circle No 9 
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1 32 V 9 - 3 ~ V 9 : G T D 
1330 PRINT LEFTS Ci 



1240 



[OFF IT 



>9,UC 



1337 
i33S 
1339 
1349 
1350 
1360 



REM 
REM 
REM 



SG$ ., V3 > U3B* I Mf-M I B$ ( " C RE''/ ] 
" ; : RETURN 

1335 REM **************************** 

1336 REM * * 

* CHECK FOR DISK ERRORS * 

* * 
**************************** 

INPUT#l,R$,B$,C*,Df 

IF VRL<fl$>=0 THEN RETURN 

PR I NT " I CLEAR ] [DOWN 3 [ DOWN 3 C R I GHT 3 1 R 
EV ] D I SK ERROR : I OFF 3 " B$ 
1378 CL03E2 
1380 END 
1335 REM 

1396 REM 

1397 REM 
1338 REM 
1393 REM 
1400 RV=8 

T " t HOME 3 [ DOWN 3 [ DOWN 3 C DOWN i E DOWN 3 C DOWN 3 C 
DOWN 3 C DOWN 3 C DOWN 3 " TRE i 2 1 > " UH I CH KEV " 
1410 GET fl*:lF R$="" THEN 1418 

1412 IF fl*-CR*RNDFK*l THEN GOSUB 540 =FK 
678 

H*«"[:REV3" THEN RV=l:GDTO 1418 
R$="[OFF3" THEN RV=8 : G0TD 1418 

1415 IF R*=CR* THEN GOSUB 548 : GOSUB 538 

:POKE V+21,1 :GOTO 160 

1420 R=flSC<R*> : IF RC32 OR 



* * 

* CONVERT RSCII TO SCREEN * 

* * 
**************************** 

POKE V+21,0:IF FK=1 THEN PR IN 



=8 : GOTO 

1413 IF 

1414 IF 



Cfi>127fiNDfl<16 



IF 
IF 
IF 
IF 
IF 



0) THEN 

1438 IF 

1440 

1458 

1468 

1478 

1480 

1430 

1500 

1585 

/64> 

1518 

15^u 

1530 

=1 

1540 

KEV+21 



THEN 
THEN 
THEN 



1588 

R=fl-64 : GOT 1500 
fl=fi-32 : G0T0 1588 
fl=fl-64 : GOTO 1588 
fl=R-128:G0T0 1588 
R=R-64:G0TG 1588 



1418 

fl<64 THEN 

R<96 THEN 

R<128 THEN 

fl<132 

fl<224 

R<255 
fl=34 

IF RV=1 THEN R=fl+128 
GOSUB 540: GOSUB 62@:8S»TT 
:Z1=R~64*TT:IF TTOSS THEN 
V1=INT<Z1/16> 
IF XK13 THEN 
IF Xl>12 THEN 



X1=Z1-Y1*16 
X1=52+X1*16 



TT=INT<R 
GOSUB 868 
VI -166+1 6*V1 
FL=0 : GQTO 1548 



P0KEV+16..FL 
1 : IF FK=1 



X1*-12+<X1-12>#16-FL 



POKEV,Xl:POKEV+l,Vl:PO 
THEN FK=0 i fl$=CR$ : GOTO 



738 

1558 DC-32: GOSUB 590:DC=255: P=Z1+TT*64 

L=CB+P*8 : GOTO 518 

1595 REM **************************** 

1536 REM * 

1557 REM * LORD R ROM CHARACTER SET 

REM * 

REM 



1538 
1533 



* 
* 
* 
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1683 PRINT "[HOME] [RIGHT] [RIGHT] [RIGHT 3 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ RIG 
HT ][ RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [ 
RIGHT] [RIGHT] [RIGHT] [RIGHT] 



1619 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [RIGHT] [RIGHT] [REV] LORD 

[OFF]" 

1620 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[ R I GHT ] [ R I GHT ] [ R I GHT ] [ REV ] FROM ROM 

[OFF]" 
1 630 PR INT" E HOME ] C DOWN ] [DOWN] [ DOWN J [ DOW 
N]"TREa8)"_ 

1 640 PR I NTT AB < 1 8 ) " [ REV ] G C OFF ] RHPH I CS~ [ R 
EV]TCOFF3EXT: "; :POKE204,0 
1 650 GET A* : I F A$<> " G " AND A$<> " T " fiNDfl*OCR 
*THEN1650 

1 652 P0KE2G4 A ■ PRINT 1 ' i HOME 3 [ DOWN 3 [ DOWN 3 
[ DOWN 3 [ DOWN 3 " THE CI?)" " : P 
RINTTABU?)" 

1653 IF R$=CR* THEN 1730 

1 654 L I =6 = COL= 19 • LE*1 = MSG$= " [OFF 3 TO WH I 
CH SET = [ OFF ] " ! GOSUB 1 230 = SE=VRL C I N$ > 

1 655 I FSEO 1 AND < SE<40RSE>7 ) THEN 1 654 

1 656 CS=SE : POKE 1 570 , CS+ 1 76 

1 660 PR I NT " [ HOME ] C DOWN ] [ DOWN ] [ DOWN ] [ DOW 

N] [DOWN] "TAB< 18V 

1680 SR=53248:IFfl$="T"THEN SR=55296 

1687 HI=SR/'256 = L0=SR-256*HI 

1688 POKE 251 >LO: POKE 252, HI = POKE 253,0 
:POKE 254,CS*8 

1 690 P0KE56334 , PEEK C 56334 > ANB254 : POKE 1 > 

PEEKU)AND251 

1700 SVS 976 

1710 POKE 1 , PEEK < 1 ) 0R4 ■■ P0KE56334 , PEEK < 56 

334) OR 1 

1720 GOSUE 610 

1730 GOSUB 1160: RETURN 

1764 REM **************************** 

1765 REM * * 

1766 REM * SAVE fl CHARACTER SET * 

1767 REM * TO CASSETTE * 

1768 REM * * 

1769 REM **************************** 

1770 PRINT "[HOME][RIGHT3[RIGHT][RIGHT3 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIG- 
HT] [RIGHT] [RIGHT3[RIGHT3[RIGHT3 [RIGHT] C 
RIGHT] [RIGHT] [RIGHT] [RIGHT] 



1780 PRINT "[RIGHT] [RIGHT] [RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT3CRIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] 
[ R I GHT ] [ R I GHT ] [ R I GHT 3 [ REV ] SAVE 
[OFF]" 
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17.90 PRINT "[RIGHT] [RIGHT 
] [RIGHT] [RIGHT] [RIGHT] [RI 
GHT] [RIGHT] [RIGHT] [RIGHT] 
[ R I GHT ] [ R I GHT ] [ R I GHT ] [ REV 

[OFF]" 
I860 LI=7:C0L=1S:LE=14-PR 
)TAB<1 8) "FILENAME:" 
1 8 1 MSG*= " [ OFF ] [ OFF ] " : GO 
1820 IF IN**"" THEN PRINT 
B(18)" ":GOSUB 11 
1 830 LI *9 ■ COL* 1 9 ■ LE= 1 = MSG 
SET?[0FF]":G03UE 1230 -T 
1840 IF TS<1 OR TS=2 OR T 
EN 1830 



] [RIGHT] [RIGHT 
GHT] [RIGHT] [RI 
[RIGHT] [RIGHT] 
] TO CASSETTE 

INT LEFT*CV$,5 

SUE 1230=FL*=IN* 

LEFT*<V$,5>Tfi 
60 : RETURN 
*="[ OFF] SAVE T 
S=VAL-::iN*) 
S=3 OR TS>7 TH 



1845 
UN]" 
18)" 

1847 

1849 
1851 
WN3" 
1852 
1853 

>;el* 

1855 



PR INT " [ HONE ] [ DOWN ] [ DOWN ] C DO WN 3 C DO 
THE (. 1 8 ) ' ' PRESS : [ DOWN 3 " : PR I NT TAB < 
RECORD & PLAV [DOWN 3" 

PRINT TAB U 3) "THEN PRESS RETURN" 

GET A*: IF R$<> CHR*<13) THEN 1849 

PRINT " [HOME] [DOWN] [DOWN] [DOWN] [DO 
TAB (18)" SAVING [DOWN]" 

KL= I NT C ( 1 5-LEN ( FL* > > /2 > 

PRINTTflBC18>RIGHT*CBL*,KL)FL*LEFT$ 

20-KL-LEIKFL*)) 

PRINT TAB CIS)" [DOWN] 



CHR$<PEEKC 



I860 OPEN 2, 1,1, FL* 

1870 PRINT#2,CHR*aS); 

1380 FOR 1=8 TO 2«47:PRINT#; 

CB+I»; :NEXT=CL0SE2 

1890 PRINT LEFT*<V* J 5>TRB<19)LEFT*<BL*v 

15): PRINT: PRINT TABa8)LEFT$<BL*,16> 

1900 PRINT LEFT*<:V*,9)TAB<18)LEFT*';BL*, 

18):G03UB 1160:GOSUB 2500 

1910 RETURN 

1974 REM 

REM 

REM 

REM 

REM 

REM 

PRINT "[HOME] [RIGHT] [RIGHT] [R 
[RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT 
HT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RI 
RIGHT] [RIGHT] [RIGHT] [RIGHT] 



1975 
1976 
1977 
1978 
1979 
1980 



# 
* 



LOAD A CHARACTER SET 
FROM CASSETTE 



* 
* 
* 
* 



I GHT] 
][RIG 
GHT ] [ 



1990 PRINT "[R 
] [RIGHT] [RIGHT 
GHT] [RIGHT] [RI 
[RIGHT] [RIGHT] 

[OFF]" 
2000 PRINT "[R 
3 [RIGHT] [RIGHT 
GHT3 [RIGHT] [RI 
[RIGHTHRIGHT] 
E [OFF]" 



IGHT3 [RIGHT] [RIGHT] [RIGHT 
][RIGHT3[RIGHT3 [RIGHT] [RI 
GHT3 [RIGHT] [RIGHT] [RIGHT] 
[RIGHT] [REV 3 LOAD 

IGHT3 [RIGHT3 [RIGHT3 [RIGHT 
3[RIGHT3[RIGHT3[RIGHT3[RI 
GHTHRIGHT3 [RIGHT] [RIGHT] 
[RIGHT] [REV] FROM CA3SETT 
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SOUTHERN AUDIO VIDEO ELECTRONICS, INC. 
1782 Marietta Blvd., N.W., Atlanta, Georgia 30318 



COMMODORE VIC20 $119.00' 



PRINTER 



DATASSETTE 





DISK DRIVE 





COMMODORE 64 ALSO AVAILABLE 

Commodore VIC20/64 1541 Single Disk Drive 325.00 

Commodore VIC20/64 1530 Datassette 62.00 

Commodore VIC20/64 1525 Printer 325.00 

Commodore VIC20/64 1701 Color Monitor 245.00 

Commodore VIC20/64 1600 Vicmodem (Telephone Interface) 91.00 

*When purchased with 1530 Datassette and VL110 Reference Programmers Guide. 



VIC1110 VIC 8K Memory Expander Cartridge 41.00 

VIC1111 VIC 16K Memory Expander Cartridge 6500 

VIC1923 Gorf. 28.00 

VIC1924 Adventure Land Adventure 28.00 

VIC1917 The Count 28.00 

VIC1929 Personal Finance 28.00 

VIC1211A VIC 20 Super Expander 53.00 

VIC1212 Programmers Aid Cartridge 44.00 

VIC1213Vicmon Machine Language Monitor 44.00 

VL102 Introduction to Basic Programmtng-Part 1 18.00 

VL103 Basic Programming Part n 18.00 

YT107A Home Calculation Program Six Pack 42.00 

VT164 Programmable Character Set/ 

Gamegraphics Editor 11.00 

VM100 Personal Computing On The VIC20 4.50 

VL110 VIC20 Programmers Reference Guide 1300 




CM6A 



Get the best prices on hardware and software. For a complete 
feting of aD SAVE's products, send $5.00 for our catalogue (refund- 
able with your first order). 

Enjoy the convenience of in-home shopping. Call our toll free 
number today for orders only. 

Use your American Express, VISA, Mastercard, check or money 
order. Minimum order of $50. Shipping and handling charges 
are extra. All prices are subject to change without notice. Allow 
2-4 weeks for delivery. Prices good through July 15, 1983. 

Order Toll Free 1-800 241 2682 
In Georgia (404) 351 8459 

Circle No 59 



2810 LI=7:C 
)TRB<l'a>"FI 
2020 MSG*=" 

2030 IF IN$ 

B(13)'" 

2040 PRINT 

WN 3 "TABUS) 

NT TREU8>' 

2050 PRINT 

2068 GET fi$ 

2070 PRINT 

WN3"TRBU8> 

2075 KL= I NT ( <. 1 S-LEN< FL$ i > 

2080 PRINT 

2090 PRINT 



0L= 1 8 : LE= 1 4 = PR I NT LEFT* C V* , 5 
L FWPlME : " 

[OFF 3 CGFF 3 " : GOSUB 1 230 : FL*= I N$ 
1 THEN PRINT LEFT$<V$,5)Tfl 
" ; GOSUB 11 60: RETURN 
" C HOME ] [ DOWN ] C DOWN ] [ DOWN 3 C DO 
" I HSERT DRTR TAPE C DOWN J " : PR I 
PRESS PLflV ON TRPECDOWH3" 
TAB US) "THEN PRESS RETURN" 
: IF fl$OCHR*U3) THEH206O 
" [ HOME 3 C DOWN 3 C DOWN 3 1 DOWN 3 Z DO 
LORDING [DOWN 3" 



trb < 1 8 ) r i ght$ < but- , kl ) flsleft 
-lencfl$>:j 

TAB a 8 )"C DOWN 3 



2100 OPEN 2,1,0,FL$ 

2105 GET#2, m ■ TS=RSCXfi$)*2048 '• F0RI*8T02 

047 : GET#2, m ■ POKETS+I , RSCCR*+CHR$<; , 0) ) : NEXT 

2110 CL0SE2: PRINT "[ HOME 3 [ DOWN 3 1 DOWN 3 CD 

OWN 3 C DOWN 3 " TRB CI 8 > " C DOW N 3 " 

2120 PRINT TRB U 3)" " =G 

OSUB 1160: GOSUB 2500 : RETURN 

2500 RESTORE: FOR i=@ JO 98= READ X2-P0KE 

896+ 1 , XZ : NEXT = POKE 953.. PT ; RETURN 
2510 DRTR 160,7,177,251,162,0,42,62,157 
, 3 , 232 , 224 , 8 , 208 , 247 , 1 36 
2520 DRTR 16,240,160,7,185,157,3,145,25 
1, 136,16,243,96,234,234,234 
2530 DRTR 234,234,234,234,234,169,148,1 
33,251, 169,5, 133,252, 162,7, 160 
2540 DRTR .7,169,46,126,157,3,144,2, 169, 
81, 145,251, 136, 16,242,56 
255S DRTR 165,251,233,40,133,251,165,25 
2,233,0, 133,252,202, 16,224,96 
2560 DRTR 162,8,160,0,177,251,145,253,2 
00, 208, 249, 230, 252, 230, 254, 202, 208, 242, 
96 

REfiDV. 



Listing 3 

P0KE53281,6:G0T07 

1 REfiDL, I, S,E: PRINT" [WHITE3CCLERR3 [DOWN 
3CDOWN3CDOWN3";MID$03TR$<L>,2>J" DRTR " 

2 PR I NTWI B* < STR* < PEEK C S > ) , 2 ) , 

3 3=3+1 :T=T+1 :IFS>=ETHENPRINT:PRINT"CEL 
UE3PRINTCHR$<i47)CHR*(5>":G0T06 
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4 I FTC 1 6THENPR I NT " « " ; • G0T02 

5 L=L+ 1 •• PR I NT " E BLUE ] C HOME ] C DOWN 1 i DOWN 1 
DFlTfi" iLi " ELEFT] > " ; I i " CLEFT] , " ; S; " CLEFT J 
> " i E- PRINT" CHGME1 £ DOWN 3 C DOWN 3 C DOWN 3 C DOW 
NH DOWN] RUN"; 

6 PR I NT " C HOME 3 " ; •' P0KE63 1,13: P0KE632 ..13: 
P0KE633 ,13: P0KE634 > 13 : POKE 1 98 , 4 : END 

7 PR I NT " C CLEAR 3 C WH I TE 3 " THE < 2 > " 



3 PRINTTflB<2)"CREV] CHflRRCTER DATA TO D 
RTA STATEMENTS " 

9 I NPUT " C DOWN 3 C DOWN 3 C DOWN 3 C R I GHT 3 C R I GHT 
] C R I GHT 3 t RIGHT] STARTING LINE NUMBER " J L 
■• I NPUT " C DOWN 3 C R I GHT 3 C R I GHT 3 C R I GHT 3 C R I G 
HT 3 INCREMENT ";I:L=L-I 

1 I NPUT " C DOWN 3 C R I GHT 3 C R I GHT 3 C R I GHT 3 C R I 
GHT] WHICH CHARACTER SET "j S ; INPUT" C BONN 
]CRIGHT]CRIGHT3CRIGHT]CRIGHT]BEGIN AT U 
HIGH CHARACTER "JC 

1 1 I NPUT " C DOWN 3 [ R I GHT 3 E R I GHT ] C R I GHT ] C R I 
GHT] HOW MANY CHARACTERS H i H : S*S*2@48+C* 

12 PR I NT " C CLEAR ] " : G0T05 
READY. 



STCP 

Standard Terminal Communications Package 

'PFCTIOD OOA CP<D1>D2 BELL . 12 30:00 10:14:36 

Don't senle for non-standard Communications Prolocol! 
Access Micro Net. Source. Bulletin Boards, Local Main- 
frame, etc 

* Complete Package - includes RS232 Inter- 
face Board and software (does not include 
modem) 

* Communicates in Industry Standard ASCII 
> Upload/Download to/from Disk 

* Automatic File Translation 
» Can be controlled from keyboard or user sup- 
plied basic or machine language program 

Specify: 3.0 or 4.0 ROMS or 8032 Commodore Computer 
4040 or 8050 or PEDISK II Disk 

Price: $129.95 



h 



ATARI AND PET 
EPROM PROGRAMMER _ 

Programs 2716 and 2532 ' 
EPROMs. Includes hardware 
and software. PFT = $75.00 - 
ATARI (includes sophisticated 
machine language monitor) = 
$119.95 




Prowrner Printer - Excellent dot matrix print Parallel = S489 00 
Serial = $600 00 IEEE = S589 00 



VIC RABBIT CARTRIDGE 



"High-Speed 

Cassette 

Load and Save!" 




$39.95 

{includes Cartridge 

and Manual) 



Expansion Connector 



"Don't waste your Life away waiting to LOAD and SAVE 

programs on Cassete Deck." 

Load or Save 8K in approximately 30 seconds! Try 

it - your Un-Rabbitized VIC takes almost 3 minutes. 

It's not only Fast but VERY RELIABLE. 

Almost as fast as VIC Disk Drive! Don't be foolish - 

Why buy the disk when you can get the VIC Rabbit 

for much, much less! 

Easy to install -it just plugs in. 

Expansion Connector on rear. 

Works with or without Expansion Memory. 

Works with VIC Cassette Deck. 

12 Commands provide other neat features. 

Also Available for 2001 , 4001 , and 8032 




TRAP 65 

tRAP 65 is a hardware device that 

plugs mio your 6502's socket. Prevents 

execution of unimplemented opcodes 

and provides capability to extend the 

machines' instruction set 

ForPEt/APPLE/SYM. 

Reduced from $149.95 to $69 95 



DC Hayes Smaa Modem = $235 00 
OC Hayes Micro Modem II = $289 00 



Rana Disk Drive -375 
4 Drive Controller - 114 



More than just an Assembler/Editor! 



It's a 

Professionally 

Designed 

Software 

Development 

System 



A /n A 






MAE 

for 

PET 
APPLE 
JUARI 



Blast off with the software used on the space 
shuttle project! 

• Designed to improve Programmer Productivity 

• Similar syntax and commands - No need to reieam peculiar 
syntaxes and commands wtwn you 90 trom PET to APPLE 
to ATARI 

• Coresident Assembler/Editor - No need to load the Editor then the 
Assembler men the Editor, etc 

• Also includes Word Processor. Relocating Loader, and much 
more 

■ Options EPROM Programmer, unimplemented opcode circuitry 

• STILL NOT CONVINCED: Send (or free spec sheet' 



5% INCH SOFT 
SECTORED DISKETTES 

Highest quality. We use them on 
our PETs, APPLEs, ATARIs, and other 
computers. $22.50/10 or $44.50/20 




EPROMS 2716 = $6 50. 2532 = S12 50 

Over 40 Commodore Programs by Baker (on 4040) ■■ 



S25 00 



3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919)924-2889 (919)748-8446 
Send for free catalog! 



[MOS1WQFO 



Circle No. 14 
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Circle No. 28 



Circle No 45 



COMMODORE USERS 

Join the largest, active Commodore 
users group in North America and get — 

— Access to club library of over 
3000 free programs. 

— Informative club newsletter. 

— The latest information about the 
PET®, CBM™, VIC 20™, Super- 
PET™ and Commodore 64™. 

Send $20.00 ($30.00 overseas) for 
Associate Membership to: 

Toronto Pet Users Group 

Department "D" 

1912A Avenue Road, Suite 1 

Toronto, Ontario, Canada M5M 4A1 



iTte^ 




Quit Playing Games . . . 

Disk Based Software to Make Your 

Computer Get Down to Business 

Disk Data Manager— Create and manage your own data 

base. Allows you to create, add, change, delete, search, 

sort, print, etc. Up to 1200 records on a single disk. 

VIC 20. . . 59.95 CBM 64 . . .89.95 

Payroll System— Full featured, complete payroll sys- 
tem. Even prints checks. 

VIC 20. . . 89.95 CBM 64 . . .99.95 

Mailing List— Up to 1200 records on a single disk. 
Presorts by Zip Code. Prints on stock up to four 
labels wide. 

VIC 20 . . . 44.95 CBM 64 . . . 54.95 

Inventory Package— Maintains quantity on nand, cost, 
sales price, reorder point, etc. Generates suggested 
reorder, sales report, and sales analysis. 

VIC 20. . . 89.95 CBM 64 . . . 99.95 

General Ledger— Up to 75 accounts! Generates Balance 
Sheet, Income Statement, Update Report, etc. 
VIC 20. . . 89.95 CBM 64 . . . 99.95 

Checkbook Manager— Up to 25 expense categories. 

Tracks all outstanding checks until they are paid. 

VIC 20. . . 49.95 CBM 64 . . .69.95 

Commodore 6d and VIC 20 ai« re-jrstereo ir=r ■■ )rk<= 0* Obrw xfere 

CONTACT YOUR DEALER FOR COMPLETE 

INFORMATION ON ALL YOUR 

DISK-BASED SOFTWARE NEEDS 

Send Self-Addressed Stamped Envelope for 

Catalogue of Games and other Applications 

DEALER INQUIRIES WELCOME 




PO Box 863085 
Piano, Texas 75086 

(214) 867-1333 

VISA and MASTERCARD Accepted 



BB 



Write For FREE Catalog 



NEW 



Write For FREE Catalog 



VIC SOFTWARE CBM 64 B 



Great VIC Software 



COMMODORE 64 SOFTWARE 



PARATROOPER a High Resolution game that doesn't let you make any 
I mistakes. You are in your command. Helicopters fill the sky, (and we mean fill 
I the sky!), dropping paratroopers. Your mission is to keep 3 paratroopers from 
1 hitting the ground on either side of your gun. But that's just the beginning. You 
I score by hitting the helicopters or the paratroopers, but if you miss a shot it 
1 subtracts from your score. Therefore, you must make every shot count to 
make a high score ! IT HAS FOUR FAST ACTION LEVELS TO CHALLENGE 
I THE BEST PLAYER. The High Resolution graphics helicoptors are fantastic. 
I They look exactly like helicopters! The paratroopers are super realistic. Their 
I chutes open and then they drift down to earth. If this weren't enough the 
I sounds are fantastic. There are helicopter blades whirring and you can hear the 
! howitzer pumping shells. This game really show off the sound and graphic 
I capabilities of your VIC. PARATROOPER IS OUR #1 SELLING ARCADE 
[GAME, you've got to see this game to believe it. $19.95 

SPACE PAK Can you survive? 3 space games with the sights and sounds of 
Ian arcade. The excitement builds as the action is unending. Blast away at 
I everything in sight. The alien attacks will stop at nothing to destroy you. 
I Prepare for battle, there is no escape, only you can help. Can you survive? Hi- 
I Res, color, graphics and sound. Joystick or keyboard. 3 Games — Rocket 
I Race, Fence-A-Tron and Raiders. $19.95 

COSMIC CRUZER Hot action and 3 challenging scenarios. Move your 
I cruzer into the tunnel - fire missiles and drop bombs. Hit the fuel dumps to get 
I more fuel. Move as quick as you dare to hit the surface-to-air missiles. If you are 
I good enough you will make it to the asteroidz field and then try to destroy the 
I base. No one has destroyed the base yet. Will you be the first. $19.95 

VIC ALL STARS We took the best selling VIC programs and put them in a 
I package to save you $35. If purchased seperately it would cost you $85. You get 
I Paratrooper, Target Command, Head On, Cattle Round-up, Snake 
I Out, Trapper, Double Snake Out and Artillery. All eight games for $49.95. 
I Hurry because at this price they won't last long. Limited quantity. 8 
I Games $49.95 



Let the COMPUTERMAT 
turn your 64 into a home arcade! 

COLOR . GRAPHICS • SOUND 
ON CASSETTE 

(Disk Versions Available — Add $5.°°) 
ARCADE PAK - $24.** EDUCATION PAK - $24. 95 
3 Programs 4 Programs 

Head On Geography Match 

Alien Invasion Math Adventure 

Target Command Ruler & Micro 



TREASURE PAK - $14. 95 
3 Programs 

Adventure 
Caves of Silver 
Shuttle Voyage 



GAME PAK - $14.95 
3 Programs 

Dragon Chase 
Deflect 

Flip It 



Joystick and Keyboard versions included. 
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A few months ago I promised the 
readers of my column on assembly 
language that I would publish an 
assembler for the VIC. True to my 
word, I now present to you here the 
program EDIT/ASM. There is also the 
added benefit that the program is eas- 
ily adaptable to any Commodore ma- 
chine with only a few changes. But 
more on that later, as I now proceed 
to introduce you to EDIT/ASM. 
What Is An Editor/Assembler? 

Put very simply, an editor/assembler 
is a program or group of programs 
that lets you enter assembly language 
code, modify (edit) it, save it, and then 
convert it into actual machine lan- 
guage code (assemble it). If assembly 
language is totally new to you and you 
are interested in learning about it, I 
suggest that you either buy a book on 
it (there are several good titles avail- 
able), or at least read my monthly 
series on it (Assembly Language Pro- 
gramming on the VIC-20), starting with 
the first issue of Commander. Other- 
wise this program will be of absolute- 
ly no use to you. 

Most editor/assemblers have two 
parts— an editor and an assembler. 
EDIT/ASM is no exception, and con- 
sists of two separate yet similar pro- 
grams (in BASIC). The first, which I am 
presenting here, is the Editor Module. 
It allows you to enter code, edit it with 
useful commands, and then save it for 
use by the second module. This 
module, the Assembler Module, then 
takes your program and converts it 
into actual machine code, which you 
will then be able to load and run (as 
long as your coding works). I've pat- 



terned EDIT/ASM after the Apple's 
EDASM, and so users of the Com- 
modore assembler may find this one 
a bit strange at first. But it does work, 
and I'm sure you'll find it very useful 
in all your assembly language work. 
Hardware Requirements 

To be really workable, EDIT/ASM 
requires a 13K VIC with disk drive, but 
it can also work with cassette (changes 
are given later on). It will work with an 
8K VIC (VIC + 3K expander), but it 
doesn't leave much of a workspace. 
But it will work! 

The Editor Module 

The editor is probably the most impor- 
tant part of an assembler, as it is the 
part that interacts with the user. Bear- 
ing this in mind, I have tried to make 
the editor in EDIT/ASM as easy to use 
as possible. Source code (the assem- 
bly language instructions) can be eas- 
ily entered and edited, and makes full 
use of labels, equates and comments. 
In fact, you get quite a deal for the 
price of a magazine. Let's now see 
what happens when we RUN EDIT/ 
ASM. 

First, the screen should turn to the 
normal blue border/white background 
combination and the screen clear. In 
the upper left corner there will be the 
word "LIMIT" and a question mark, 
thus indicating the computer is waiting 
for you to input some information. 
What it actually wants is the maximum 
number of lines you wish to use dur- 
ing this run of the assembler. It will ac- 
cept any number greater than zero, as 
long as you have the memory space 
for it. It will then DIM that amount of 
memory for use by the array that holds 



the source code in memory. A prac- 
tical ceiling for LIMIT (represented by 
the variable LI in the listing) is 1000. 
I doubt that many people are going to 
use more than that, and if they do, 
they'll have two problems to contend 
with: 1) the line numbers are truncated 
to three numbers when listed, so you'll 
only see lines from 1 to 999; and 2) the 
garbage collection (the discarding of 
unwanted variables) becomes very 
time consuming, producing noticeable 
time delays before the actual execu- 
tion of the commands. That is why you 
should keep your LIMIT down to a 
practical limit (the reason I put the in- 
putting of LIMIT into the program is 
that you could then use EDIT/ASM in 
any VIC memory configuration 8K + 
without having to modify the variable 
LI manually inside the program. If you 
want to keep LI fixed, simply delete 
line 45 and replace it by 45 Ll = n, 
where n is the fixed number.) 

After having entered a value for 
LIMIT (let's say it was 1 00), the screen 
will clear once more and the title and 
copyright notice will appear just to re- 
mind you whose program this actually 
is. You should then notice a colon and 
a blinking cursor a few lines down. 
This is your signal that the computer 
is waiting for you to do something. I 
have used a colon (":") as a prompt 
to distinguish EDIT/ASM from BASIC 
(with commands like LIST and NEW, 
it's easy to confuse the two). It will ap- 
pear whenever the editor is waiting for 
a command. 

Now to do something. Type in HELP 
and hit RETURN. A list of all the avail- 
able commands should appear, fol- 
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lowed by their correct syntax. Follow- 
ing is a list of each command and its 
purpose. Note: In each of the follow- 
ing, the period represents a space, 
and should be typed in as such. It has 
been used here for added clarity to the 
list. 

ADD— allows you to add source 
code to the end of the present code 
in memory, or to start a new program 
if there is no code in memory. This 
mode is exited by hitting the "/" key 
and pressing RETURN. 

CATALOG— an adaptation of a 
routine by Jim Butterfield, this com- 
mand displays a list of all the programs 
on diskette, as if you had LOADed the 
directory. At any time the listing may 
be frozen by holding down a key, or 
aborted by hitting the SPACE bar, 
which will return you to the command 
mode. 

DELETE.a(.b)— allows the deletion 
of the specified lines from memory. A 
line number is necessary and may use 
the following syntax: 

DELETE. 2-delete line #2 

DELETE. -.3— delete from line 1 
till line 3 

DELETE.2.6— delete lines 2 to 6 

DELETE.5.— delete from line 5 
to end of program 

Remember: All periods represent 
spaces which must separate each part 
of the command. DELETE-5 is wrong 
because there is no space separating 
the hyphen ("-") and the number 5. 

DISK— allows the sending of com- 
mands to the disk drive. Enter this 
command and press RETURN. A 
prompt ("]'') will appear signifying that 
whatever you type next will be sent to 
the disk. If you don't wish to do so, 
simply hit the up-arrow key beside the 
RESTORE key and hit RETURN. You 
will be returned to the command 
mode. Another thing you can do is 
read the error channel. When 
prompted with the bracket, type in 
ERR and hit RETURN. You will be 
shown the current status of the error 
channel. Anything else is sent to the 
disk (you may use the DEL key to cor- 
rect any errors— these will not be sent). 

EDIT. a— this command allows you 
to change an existing line of code in 
memory, as specified by "a". The line 
will be listed to the screen and a cur- 
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12 

14 

lb 

13 

29 

22 

24 

26 
■"•■ft 



38 



* EDIT/ASM 

* 

* 
* 



REM 
REM 
REM 
REM 
REM 
REM * 
REM * 
REM * 
REM * 
REM * E. 
REM # 



EDITOR 
MODULE 



CO 1383 BY 



GIGUERE 



— # 
* 
* 

— * 
* 
# 

* 



34 REM *#*#***#**#**« 

35 

37 

33 

45 P0KE36S79.27 

IMIT"; : INPUTLI*:LI=VflLCLI*> 



PRINTCHR*<142>" 



IFL 



C CLEAR ]L 
K1THEN4 



43 : 

49 REM DEFINE VAR. 

50 R$=CHR$ < 1 3) ■ P$==CHR$ < 1 6 > = QU*=CHR* ( 34 ) 
: CS*= " RD I NEBL I LOSAQUHED I C ADEPLHE " 

60 0PEN15.. 8, 15 

70 D I Mfl* < L 1 + 1 > ■ X=FRE C 6 ) : P0KE788 > 1 94 

80 PR I NT " C CLEAR ] E DOWN ] E DOWN ] C DOWN ] [ DOWN 

] C DOWN ] C DOWN 3 C DOWN 3 C R I OHT ] L R I GHT ] C R I GHT 

] [RIGHT] [RIGHT] [RIGHT] [RIGHTDEDIT/ASM": 

PRINT" [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGH 

T] [RIGHT] [RIGHT] " : PRINT" [DOWN] [ 

RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGHT] [RIGH 

T] if''** lyS:'} BV" 

85 " PR I NT " [ DOWN ] [ R I GHT ] C R I GHT ] [ R I GHT 3 i R I 

GHT ] [ R I GHT J ER I C G IGUERE [ DOWN 3 C DOWN ] I DOW 

NHDQWN]" 

98 : 

99 REM GET COMMAND 

1 00 PR I NT " [ BLUE ] [ DOWN l-"i- GOSUB 1 000 : PR I 
NT : 2$= I N* : GOSUB 1010: COM$=LEFT$ C fl* , 2 ) 
102 Y=0:FORZ=1TO25STEP2: IFCOM**MID*<CS* 
. 2. 2>THENY=Z/2+. 5 : 2=26 

104 NEXTZ: I FV=0THENPR I NT "[GREEN] ILLEGAL 
COMMAND [ BLUE ] " : GOTO 1 00 
1 06 ONVGOTO 1 1 > 1 30 , 1 60 , 1 85 , 
360 .. 380 , 480 , 478 , 490 , 550 
108 : 
109 

110 

N*. 1 >="/"THENL=L-l : GOTO100 

115 fl*<L)»IN$: IFL=LITHENPRINTR$"[RED]WA 

RNING - NO MORE ROOMSAVE FILE NOW. [BLUE 

]": GOTO 100 

120 GOTO110 

129 REM INSERT 



258.300.350. 



REM ADD 

L=L+1 : GOSUB 1025 : GOSUB 1050 : IFLEFT$C I 



sor will appear under it. Type in the 
new line, press RETURN, and it is 
automatically entered into memory. If 
you don't want to edit the line, hit the 
"/" key and press RETURN. The line 
will remain as it was. 

HELP— displays a list of all the 
available commands in case you get 
stuck. 

INSERT. a. b— allows the insertion of 

code between existing lines. The "a" 
specifies the line to insert at, and "b" 
specifies the number of lines to insert. 
Omission of any of these gives an 
error. The following is an example of 
using INSERT: 

INSERT.3.10— will allow you to 
insert ten lines starting at line 3. 

Insert may be aborted at any time 
by typing "/" as the first letter of the 
line, but it will leave the remaining lines 
that were inserted blank. 

LIST(.a)(.b)— will list the present 
lines of code in memory to the screen. 
LIST by itself will list the entire pro- 
gram, while LIST with any other pa- 
rameters will list only those. The follow- 
ing are acceptable syntax: 

LIST.2— list line #2 

LIST.-. 3— list to line #3 

LIST.3.4— list lines 3 to 4 

LIST.5. — list from lines 5 to end 
of program 
At any time the listing may be frozen 
by holding down a key, or aborted by 
pressing the space bar. 

LOAD(. filename)— will load a file 
from cassette or disk. Adds ".SOU" to 
the end of the filename to make sure 
it loads only source code created by 
this program — not object code 
(created by the assembler). If the file 
is too large to fit into the present LIMIT, 
an error message will appear and the 
operation will be aborted. 

NEW— allows the creation of a new 
source code program. If typed acci- 
dentally, exit the program using QUIT. 
Then type in direct mode L = n, where 
n equals the last line of your source 
code before being NEWed, and press 
RETURN. Then type GOTO 100 and 
you will be returned to the command 
mode. A LIST should reveal that your 
program is now back in memory. 



136 IFB=0ORC=0THEN1830 

1 35 IF < B< 1 0RB>L ) OR < C+L>L I ) THEN 1 939 

140 F0RI=LT0BSTEP-1 : fl$(I+C>=fi*< I ) : H$a;' 

=" m :he:«:t:l^l+c 

1 50 te=l : f0rls*bt0b+o 1 : gosub 1 025 : gosub 1 

000 • m i D~ I H* : I FLEFT* < I N* , 1 3 * " / " THENL=B 

+C 

155 NEXTL^TE^GOTOIOO 

153 :" 

159 REM EDIT 

1 60 I FE< 1 QRBXTHEN 1 030 

1 65 TE=L • L=B : PR I NT M C DOWN "J C BLACK ] " ; : GOSU 

B 1 025 : PR I NTH* C L > " [ BLUE ] C DOWN ] " 

1 70 GOSUB 1 025 : GOSUB 1 050 : I FLEFTS ( I H$ , 1 ) * 

V"THENL=TE: GOTO 100 

1 75 A* ( L ) * I H* : L==TE ' GOTO 1 00 

183 • 

184 REM LIST 

185 IFL=0THEH100 

190 GOSUB 1075= IFETHEH1030 

195 TE^L : F0RL=SLT0EL ■ GOSUB 1025 ■ Z*«fl$<L) 

: GOSUB 1010 : GOSUB 1 045 

197 IFLEFT*<2** J>= ,, * ll 0RLErr*<2*.l>« J 'J "T 

HENPRINTfl*<L):GOTO202 

200 PR I HTftt ; TAB (11)B$; TAB ( 1 5 ) C$ : I FD$<> " 

"THENPRINT" [BLUE] M D$" C BLACK] " 

292 GET A* : I FA$* " " THENL=EL+ 1 ■ G0T02 1 

205 WflIT197,64 

210 NEXTL:L=TE: GOTO 180 

248 : 

249 REM LOAD 

250 IFB*=""THEN1030 

255 PR I NT# 1 5 , " 1 " : 0PEN2 ,8,2," : M +B$+ " - S 
0U,S,R" : IHPUT#15,E,E$- IFE>20THEN1040 
260 I HPUT#2 , L : I FL>L I THEHPR I NT " C DOWN J [ PU 
RPLElFILE TOO LARGECBLUE] " : L=0 > GOTO270 
265 FQRI=1TDL : INPUT#2, B$i I ) : NEXT 
270 CL0SE2: GOTO 100 

298 : 

299 REM SAVE 

300 IFB*= ,,,! THEN1030 
302 PRINT* 15," 19" 

385 PR I NT# 15," S ■ " B*+ M . SOU " : OPENS , 8 , 3 , " 9 

: u +B$+ n . SOU i S , W " ' I NPUT# 1 5 , E , E$ > I FE>20TH 

EN 1048 

310 !Fflt* H "THENPRINT : GOTO402 

3 1 5 FOR I = 1 TOL : PR I NT#3 , QUffl* < I ) QU* : NEXT 

326 CLOSES: GOTO 100 

348 :■ 

349 REM QUIT 

350 PRINT" [DOWN] TYPE "GOTO 10fl ; TO RE-S 
TART." :PQKE788, 191= END 

357 : 

358 : 
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PLIST(.a)(.b)(.tit1e)— allows the 

listing of your program onto a printer. 
PLIST by itself lists the whole program. 
The rest of the syntax is like LIST and 
DELETE. You may also add a title to 
the listing using the .title reference. 
After typing PLIST and the parame- 
ters, hit the space bar and type in the 
title you wish printed. It will be printed 
on the first line, and the listing will 
follow a couple of lines down. To get 
a complete listing with title, type PLIST, 
3 spaces, and the title. The complete 
program will be listed with a title 
beforehand. 

QUIT— allows the user to quit the 
program. Type GOTO 1 00 to re-enter 
program intact. 

SAVE. filename— allows you to 

save a program to disk or tape. Tacks 
on a ".SOU" to the end to differentiate 
between source and object code. 

That was the complete list of com- 
mands. As you can see, they are quite 
powerful and versatile, making for 
easy entering and editing. 

Entering Source Code 

It may be very well to have all these 
commands, but they amount to 
nothing if you cannot use them prop- 
erly. Our first priority is to learn how to 
enter data. The following is an explan- 
ation. 

After going through the opening 
procedures, type the command ADD. 
A number one (1) should appear on 
the line below, followed by a blinking 
cursor. The number refers to the line 
of code you are presently entering and 
is used for editing purposes only. It will 
not be present when the object code 
(the machine language program) is 
generated. You now have three 
choices as to what to do: 1 ) enter a line 
of code; 2) enter a comment; and 3) 
exit this mode. To exit, you need sim- 
ply type the ("/") and hit RETURN. 
You will be returned to the command 
mode. The other two are more compli- 
cated. 

Entering a line of code is what you 
will be doing most often. One line con- 
sists of an instruction, and can be ac- 
companied by a label and a comment, 
as such: 
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359 REM HEW 

360 L=0: GOTO 100 



379 REM DISK 

380 PR I NT " 3" ; : GOSUB 1 050 = I F I N*= " t" THEN 1 



335 I F IN** " ERR " THEN I NPUT# 1 5 , E , E* : GOTO 1 

42 

390 PR I HT# 15 , I N* • GOTO 1 00 

393 : 

399 REM CATALOG 

400 PR I NT# 1 5 , " I O " = 0PEN4 ,3,0 , " *0 " : NU*=CH 
R*<0) 

401 GET#4,A*,A* 

402 GET#4,A*,A$ 
405 IFA*=""THEN465 
410 GET#4,A*,B* 

420 PR I NT ASC C A*+NU$ ') + ASC < B*+HU* ) *256 i 

430 GET#4,A* 

440 IFA*=" "THENPRINT : GOTO402 

450 PR I NT A*; 

452 GETA*: IFA$=" "THEN4S5 

455 WAIT197,64 

460 GOTO430 

465 PR I NT : CL0SE4 : GOTO 1 00 

463 : 

469 REM DELETE 

470 GOSUB 1 075 : I FEOR i SL= 1 ANDEL=L > THEN 1 03 



480 X=EL-SL+ 1 : FOR I =EL+ 1 TOL : A* ( I -X ) =A* C I 
) : A* CI ) = " " • NEXT : L=L-X : GOTO 1 00 

488 : 

489 REM PRINT LIST 

490 IFL=0THEN100 

500 GOSUB 1075 : IFETHEN1030 

5 1 CL0SE4 : 0PEN4 , 4 : PR 1 NT#4 , R* : I FB*0 " " T 

HENPRINT#4,D*.;R* 

515 TE=L : F0RL=SLT0EL : GOSUB 1025 '• PRIHT#4, 

L*; :X*=LEFT*CA*CL>,1> 

517 1 FX*= " ; " 0RX*= " * " THENPR I NT#4 , fl* < L > ■ G 

0T0525 

520 Z$=A*(L> :GOSUB1010:GOSUB1045:PRINT# 

4, A*; P*" 13"B*; P*" 17"C*j P*"29"D* 

525 GETA*:IFA*=" "THENL=EL+1 

530 NEXT:L=TE:PRINT#4,R*"END OF LIST"R$ 

:CL0SE4: PRINT '-GOTO 100 

549 REM HELP COMMAND 

550 PRINT" [BLACK] ALL SLASHES SHOULD BE 
TYPED IN AS SPACES: [DOWN]" 

555 PRINT "I BLUE ][ RE V]flD [0FF]D ": PRINT "[R 

EV]CA[QFF]TALQG" 

560 PRIHT"[REV]DE[OFF]LETE[REH]/LINE#C/ 

LINE#>": PRINT" [BLUE] [REV] DI [OFF] SK" 

565 PRINT" [REV]ED [OFF ]iT[RED]/LIN£#" : PR 

I NT " [ BLUE ] [REV 3 HE [OFF ] LP " 



START LDA #$00 ;COMMENT 
Here START is a label to refer to that 
line, LDA #$00 is the instruction, and 
;COMMENT is a comment. These are 
all separated by spaces, and are 
entered the same way. First you enter 
the label. Then you hit the space bar 
and enter the instruction itself (such as 
LDA). If the instruction requires data 
(such as #$00), hit the space bar again 
and type in the data. The comment is 
not necessary, but if you wish to 
have it, you must again type the space 
bar and then enter your comment. If 
you've noticed something, it's probab- 
ly that everything is separated by a 
space character. This is true, as the 
space is used when both listing and 
assembling to separate the fields, or 
different parts of an assembly listing. 
Thus if you don't want a label, you can 
simply hit the space bar and type in 
the instruction. Similarly, if you don't 
need any data following the instruction 
but want a comment, you should hit 
the space bar twice after the instruc- 
tion and then type in your comment. 
This may all seem a bit strange at first, 
but you'll soon get used to it. Simply 
remember that once you hit the space 
bar you skip to the next field, and it will 
become a virtual habit with you. 

As for entering comments, there are 
two distinct ways (these comments I 
am now referring to are different from 
those that may follow an instruction). 
You may either type in a "*" or a ";" 
and then your comment. Both are ac- 
ceptable, and the "*" is used mainly 
for decoration. When listed, comments 
will appear as they were typed, and 
will not be separated into fields as will 
any other lines. They're just there to 
help document and beautify the pro- 
gram. 

Special Pseudo-Opcodes 

Opcodes are the commands that 
the computer recognizes, such as 
LDA and CMP. Pseudo-opcodes 
resemble opcodes, but in fact are in- 
structions to the assembler, not the 
computer. They are used to tell the 
assembler to do something. The 
pseudo-opcodes are placed where a 
normal instruction would usually be, 
but are not outputted as part of any ob- 
ject code. The pseudo-opcodes I have 



570 PR I NT " C REV ] I H C OFF ] SERT C RED 1 /L I HEtt/N 

. " : PR I NT " [ BLUE ] [ REV ] L I C OFF ] ST C RED 3 ( /L I 

NE#></LINE#>" 

575 PR I NT M C BLUE ] I REV ] L0 E OFF ] AD/ C RED ] F I L 

ENflME " : PR I NT " C BLUE ] [ REV ] HE [ OFF ] W " 

530 PR I NT " [ REV 3 PL [ OFF ] I ST C RED ] < /L I NE# ) ( 

/L I NE# ) " : PR I NT " C BLUE ] C REV ] QU C OFF ] I T " 

5S5 PR I NT " C REV 3 Sfl C OFF ] VE C RED ] /F I LENAME ,! 

: PRINT 

590 GOTO ISO 

995 

936 

99? 

998 

999 REM INPUT ROUTINE 

1 000 CLGSEK : OPEN 1.0*1 NPUT# 1 , I h» '■ PR I NT : C 
LOSE 1: RETURN 

1009 REM ROUTINE TO FIND FIELDS 

1010 F0RY=3TQ2 : SP ( V ) =0 ■ NEXT ■ V=0 : F0RZ-- 1 T 
0LEN(Z$> 

1012 X*=f! I D$ < Zt , Z , 1 ) : I FX$= " " THENSP C V ) = 

2: v=V+l - IFY>2THENZ=LEN<Z$>+1 

1014 NEXTZ : fl$=" ,l : B$=" " : C*»" " : D$= n " 

1 1 6 I FSP ( > =8THENR**2* ■ GOTO 1 024 

1018 fl*«LEFT* < Z* , SP ( > - 1 > : I FSP ( 1 ) =0THEN 

B*=M I D* ( Z$ > SP ( ) + 1 } : GOTO 1 024 

1020 B*=MID*CZ*.SP<B>+l.SP<l>-SP<e>-t>-: 

IFSPC2)=0THENC*=MID$<Z$, SPU )+I > : GOTO 10 

24 

1022 C$=MID*(Z$,SP(i::' + l,SP':;2>-SPa>-l>- 

D*=MID$<Z*,SPc:2::> + i::' 

1024 B=VflL<fi*> : B=VflL<B*> : C*VflL<C*'5 : D=Vfl 
L(D*>: RETURN 

1025 L$=MID$':STR$a>,2>:L$=RIGHT*<; ,! 
+L*+" %4>:PRINTL$J -RETURN 

1028 = 

1029 REM ERROR MESSAGE 

1030 PRINT" CRED] ILLEGAL PARAMETERS [BLUE 
3 M : GOTO 100 

1038 : 

1039 REM DISK ERROR 

1040 PRINT" CDOWN 3 [RED 3 DISK I/O ERROR -" 

1042 PRINT" C DOWN] C BLACK] CLEFT]"E" CLEFT] 
, "E* : CLOSES • CLOSES • GOTO 100 

1043 : 

1044 REM TRUNCATE STRINGS 

1045 ft**LEFT*<fl* ,6) :fi*«LEFT*<B*i3> -CS^L 
EFT$-iC$, 10): RETURN 

1 050 U A I T 1 97 , 64 : P0KE2 12,0: POKE204 , : X$= 
n ii ; ij i=rp|-|t?f i' *~'0 '» : INi—" " 

1 055 POKE207 , = Wfl I T 1 98 , 255 '• POKE207 , 255 = 
GETX* : I FX* >V*THEH I N*« I Nf +X$ = PR I NT" C LEF 
TVXSi ■ GOTO 1855 

1060 IFX**CHR*C20)flNDUENC INt>THENIH»«LE 
FT*< IN*, LENaN*)-l ): PRINT" [LEFT DELEFT] 
CLEFT]"; : GOTO 1055 
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included in my assembler go as 
follows: 

ASC— places the ASCII value of a 
string in consecutive bytes of memory. 
Ex: MESSG ASC "HELLO"-will 
place the word HELLO in ASCII form 
in memory and give that location the 
label MESSG. 

BYT— places individual values into 
consecutive memory locations. Ex: 
VALUES BYT 1,34 1 56 ) $FB— will place 
the values 1,34,56 and $FB at the 
location VALUES. 

DST— defines storage space by tell- 
ing the assembler to skip ahead a cer- 
tain number of bytes without actually 
filling them in with a value. Ex: TABLE 
DST + 1 0— makes the assembler give 
the label TABLE to the assembler's 
present memory location and then 
skip ahead the specified number of 
bytes, in this case 10. 

EQU— assigns a label a particular 
value that you specify. May be one or 
two bytes long, hexadecimal or 
decimal. Ex: BLANK EQU $20— gives 
the label BLANK the value $20 hex or 
32 decimal. 

ORG— defines the starting location 
of the code to be assembled. Can only 
be used once in program. Ex: ORG 
$033c— defines the program to start at 
$033C (828). No label is used. 

These instructions will be discussed 
more in part 2. 



1 865 I FX**CHR* < 1 3 > flNDLEN ( I N$ ) >0THEHPR I H 
T " " : P0KE284 , 1 : P0KE2Q7 , : RETURN 
1670 GOTO 1055 

1072 : 

1073 : 



1074 
1075 
1 : £L- 
1080 
1085 

cr 
.-J 

1030 

1095 
1037 

RERDV. 



REN FIND PflRflM. 

PRINT" [BLACK] 11 ; ■' IFB*0flNDC*0THEHSL- 
: L: GOTO 1035 

I FBS* " - " THENSL* 1 : EL=C : GOTO 1 095 
SL=B = EL*C = IFC$=" -"THENEL=L « GOTO 103 

IFC«0THENEL-SL 

E^0 : IF3L<10REL<SL0REL>LTHENE=1 

RETURN 



Labels 

One of the more useful parts of an 
assembler is the usage of labels. 
Labels are words that refer to a cer- 
tain part of a program or to a certain 
value. For example, BNE L00P1 
would mean to branch if not equal to 
the code with the label L00P1 . A line 
like 

STL00P LDA TABLE, X 
would load the accumulator from the 
location defined by the label TABLE 
plus the X-register. TABLE may have 
been previously defined by an 
ASC, BYT, DST, or EQU statement. In 
any case, labels are easy to use and 
very useful. 



SPORTS STRATEGY GAMES 
FOR THE VIC 20* 

No Joystick Required PLAYER VS COMPUTER cassette 

BASEBALL ADVERSARY 5K $10.95 

PINCHHITTERS, RELIEF PITCHERS, SACRIFICES, ETC. 



FOOTBALL ADVERSARY 13K (5K plus 8K exp ) 
PENALTIES, SAFETIES, STATISTICS DISPLAY, ETC. 



$14.95 



We pay shipping 

Ind. residents add 5% sales tax 

*VIC 20 is a TM of Commodore 



PARR PROGRAMMING 

2664 TYLER STREET 

GARY, INDIANA 46407 

(219) 885-0611 



Changes 

Changes for cassette users follow 
the program listing. They are very few. 
The only real difference is that the 
cassette users lack the DISK and 
CATALOG commands, which have no 
use with tape. As for other Com- 
modore computers, there are very few 
changes to be made. The deletion of 
all color commands is one. Another is 
the replacement of all WAIT 1 97,64 by 
an appropriate WAIT or GET (all the 
WAIT does is wait until you are not 
pressing any keys). Also, the two 
pokes to location 788 should be 
deleted. They disable the STOP key. 
And finally, the pokes in the input 
routine that turn on the cursor and then 
turn it off, as well as the WAIT com- 
mand that waits until a keypress has 
been signaled into the keyboard buf- 
fer. (You may also wish to change the 
screen format.) But apart from these, 
there are no real changes to be made 
to the program proper. 



Next Month 

Next month I'll be presenting the 
assembler module and the instructions 
for using it. I won't be offering to make 
copies yet as you should have the in- 
structions as how to use both parts of 
the utility. I'll leave you with a sample 
of the printer output of the editor 
module. You may contact me at: Box 
901, Peace River, Alberta, Canada 
TOH 2X0.; j 
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PROGRAM CHANGES FOR CASSETTE USERS: 

DELETE LINES: 

6Pi 

388-397 

400-460 

:!.S40 
CHANGE THE FOLLOWING LINES: 
CSf IN LINE 53 SHOULD READ "ADINEDLILOSAQUNEDEPLHE" 

IN LINE 102 THE FOR.., NEXT STATEMENT BECOMES: 
F0RZ*1T021 INSTEAD OF F0RZ=1T023 

1.95 ONVGOTOl 10, 130, 160, 1S5, 250, 300, 359, 360, 470, 490, 550 

V55 0PEN2 ,1,0, B*+ " . SOU " 

■J35 0PEN3, 1, i,B*+",SDU° 

555 PRINT-CBLUE^VSDADCRVOFF]" 

5SQ PR I NT " C R V3 3 BE C RVOFF ] LETE C RED ] /L 1 NE# < /L I NE# > " 

TNSERT A C BLUE 3 CURSOR CONTROL IN LINE 565 JUST BEFORE THE CRVSH 

TiOSE ARE ALL THE CHANGES. 



-fr 



TELECOMMUNICATIONS on theVIC and '64! 

"A versatile and exceedingly well-done package." David Malmberg, MICRO 

"Simply the best & nicest VIC terminal software I have seen/' 

Greg Yob, CREATIVEJ20JVIPUTING 

We created quite a Hurry and earned raw reviews with 
Termmal-4Q T the unique software that transforms the t ..... 
VJC screen into a 40iolumn smooth-scrolling display. ^** - 
And with features Hke a Receive Buffer and VIC MODEM 

printer dump, Terminal 40 sets a new standard for per- 
sonal modem communications with networks such as 
CompuServe and Source. Our '64 Terminal does the 
same quality job for the '64, jt 

And now there's even MORE!!! Super Term for the 
VIC and '64 supports text storage to dish or tape 
and program UPLOAD/DOWNLOAD. SuperTerm, 
used with our Smart ASCII interface, also 
supports popular parallel printers. 

Choose the one right for you. Call or write 
today for the "best", then ... 




For the VIC: 

Terminal40 (req sk exp). $29.95 

SuperTerm (reqi6Kexp) Call 

For the Commodore 64: 

'64 Terminal $29.95 

SuperTerm Call 

(On cassette. Requires modem.) 



REACH OUT - 
and BYTE SOMEONE! 



a 



MIDWEST 
MICRO m< 



31 1 W. 72nd ST. • KANSAS CITY • MO • 641 14 



ORDER DESK: (816)333-7200 

Send for a free brochure describing our 
other quality products. 



MAIL ORDER: Add $1.50 shipping and handling 
($3.50 for C.O.D.); VISA/Mastercard add 3% (card* 
and exp. date). Missouri residents include 4.6% 
sales tax. Foreign orders payable U.S.$, U.S. Bank 
ONLY; add $5 shp/hndlg. Dealer inquiries invited. 
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SOUTHERN AUDIO VIDEO ELECTRONICS. INC. 

1782 Marietta Blvd., N.W., Atlanta, Georgia 30318 

Everything you need 
to support your 

£s commodore VIC20 
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Cardco, Inc. CB/6 Cardboard/6 66.00 

Cardco, Inc. C/Cardprint/a 53.00 

Cardco, Inc. CE/1 Cardette/1 26.00 

Creative Software Decision Maker/tape 12.25 

Creative Software Loan Analyzer/tape 9.50 

Creative Software Car Costs/tape 12.25 

Creative Software Home Inventory/tape 12.25 

Creative Software Choplifter/cartridge 31.50 

EPYX 126 C Invasion Orion 16.00 

EPYX 237 D Upper Reaches of Apshai 12.00 

EPYX 436 C Crush, Crumble & Chomp! 18.00 

EPYX 526 C Ricochet 12.00 

HES C301 Vic Forth 38.00 

HES C302 Hes Mon 25.00 

HES C303 Turtle Graphics 25.00 

HES C304 Hes Writer 25.00 

HES C305 Aggressor 25.00 

HES C307 Shamus 25.00 

HES C308 Protector 27.50 

HESG213Torg 12.00 

HES G214 Raid On Isram 13.00 

HES C310 Robot Panic 24.00 

HES C312 Gridrunner 24.00 

UMI 1604 Spiders of Mars 27.00 

UMI 1635 Outworld 27.00 

UMI 6611 Amok 17.00 

WICO 15-9714 Joystick 21.00 

WICO 72-4545 Commodore 47.00 

WICO 15-1756 12'-0" Extension Cord 4.75 

Maxell. Mini-Disks. B%". 

MD-2D Double sided, double density. For use on Tl, Shugart 
or equivalent ( 10 pkg.) $47.50 

MD-1 Single sided, single density for mini floppy disc 

drives (10 pkg.) $33.50 

Cardco, Creative Software, EPYX, 
HES, UMI, WICO, Romox. 

Get the best prices on hardware and software. For a com- 
plete listing of all SAVE's products, send $5.00 for our cata- 
logue (refundable with your first order). 

Enjoy the convenience of in-home shopping. Call our toll free 
number today for orders only 

Use your American Express, VISA, Mastercard, check or 
money order. Minimum order of $50. Shipping and handling 
charges are extra. All prices are subject to change without 
notice. Allow 2-4 weeks for delivery. Prices good through 
July 15, 1983. 

Order Toll Free 1-800-241-2682 
In Georgia (404)351-8459 

CM6-B 
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Hcommodore 

NEW COMMODORE PRODUCTS 

CBM 128-40 S 695 

CBMC128-80 795 

CBMB700 2990 

CBM 1520 Plotter 169 

CBM 1 701 Color Monitor 269 

B Series Software Call 

CBM 4023 Printer 399 

SOFTWARE FOR CBM 64 K 

Word Processing (WordPro 3+) S 69 

M File Database 

(merge with Word Pro) 89 

Quick Brown Fox 56 

Writer's Assistant (easy and flexible) ... 99 
FileAssistant(databas6wffhmerge) ... 99 

Spreadsheet Assistant 99 

Pens, Finance Assist. (great reports) ... 45 

Busicalc (Spreadsheet) 55 

Coco II (buildyour own games easily). .. 45 

Calc Result 125 

General Ledger, A/R, A/P 

(with check writing) ea.139 

CBM EasyFinance 50 

CBM EosyScript 80 

CBMEasyFile 80 

Data Manager 70 

Stock(investment analysis) 80 

Pet Emulator (emulates 4.0 basic) .... 30 

Sprite-Master 29 

Assembler Package (cassette or disk, 

compiled includes editor, loader, 

disassembler) 39 

Spacebelt 20 

Retroball 34 

ZWARK 25 

INTERFACES A ACCESSORIES 

80 Column Expander 3159 

VIC 1600 Modem 95 

VIC 1650 (auto answer, auto dial) 150 

VIC 1525 Graphic Printer 329 

VIC 1530 Datasette Recorder 65 

VIC 1541 Disk Drive 329 

VIC Switch (connect 8 64's or Vies 

to printer, dd) 1 49 

PET- IEEE cable 33 

IEEE-IEEE cable (2m) 43 

Parallel Interface (Epson, Okidata 

IDS, NEC) 80 

RS-232 Printer Interface (Okidata 

Diablo, etc.) 60 

Programmers Reference Guide 18 

Verbatim Diskettes (10 per box) 26 

Victree (Programmers Utility) 75 

VIC PRODUCTS A ACCESSORIES 

8K RAM Memory Expansion Cartridge ... $ 40 

16KRAM 70 

24KRAM 105 



VIC 3 Slot Expander 27 

VIC 6 Slot Expander 70 

RS-232 Printer Interface 65 

Cassette Interface 30 

Gorf(64also) 30 

Omega Roce 30 

Arcade Joystick - Heavy duty w/2 firing 

buttons! Great for the VIC or 64 ... . 25 



MONITORS - GREAT 
RESOLUTION (64 OR VIC) 

AmdekColorl S 299 

Amdek II or III call 

Panasonic CT160 279 

Comrex 6500 - 1 3" Color 299 

Transfer 20 (High Resolution 

Green Phosphor) 1 29 

video/ Audio Cable 15 

PRINTERS - LETTER QUALITY 

CBM 8300, 40 cps $1450 

Diablo 620, 25 cps 949 

ComRlter, 17 cps 819 

Transtar 130, 16 cps (auto load, 

wp features!) 769 

NEC 7700 series 2350 

NEC 3500 series 1600 

PRINTERS - DOT MATRIX 

CBM 8023, 150 cps/ graphics 589 

Epson FX Printer, 1 60 cps 549 

Epson MX-80FT 459 

Epson MX-80 w/Graftrax 349 

CBM Graphics for Epson 65 

Okidata 82A, 120 cps (serial 

and parallel) 429 

NEC 8023A (parallel) 429 

Okidata 92 559 

Star Gemini, 10 329 

Star Gemini, 15 499 

COMMODORE BUSINESS 
SERIES 

SuperPet (5 languages, 

2 processors) $1 409 

CBM 8032 Computer, 80 Column ... 1029 

CBM Memory Expansion, 64K 359 

CBM 8050, 1 mg. Dual Drive 1259 

CBM 8250, 2 mg. Dual Drive 1 395 

CBM D9060, 5 mg. Hard Disk 1995 

CBM D9090, 7.5 mg. Hard Disk 2295 

CBM 2031 , 1 70K Single Drive (New) 489 
DC Hayes Smart Modem 220 

BUSINESS SOFTWARE 

WordPro 4 4 or 5+ S 309 

Administrator 489 

VlsiColc (expanded) 199 

Tne Manager (database) 199 

BPI A/R, G/L Job Cost, Inventory, 
Payroll ea.325 



MasterCard, Visa, 
Money Order, Bank Check 

COD (add $5) accepted. 

Add 3% surcharge tor credit cards 

In stock items shipped within 48 hours, 

F.O.B, Dallas, Texas 

All products shipped with manufacturer's 

warranty. 

Prices are subject to change without notice. 

TO ORDER 

CALL TOLL FREE 

800-527-4893 

800-442-1048 

(Within Texas) 

Business Hours 
Mon.- Fri. 8 to 6, Sat. 10-2 

Write tor tree catalog. 

GAME OF THE MONTH 

Adventu- Writer (make your 
own adventure game) 39 

PRODUCT OF THE MONTH 

INTERPOD (intelligent IEEE 
RS232, serial interface 
forVICorC64) $ 179 





SJB DISTRIBUTORS INC. 

10520 Piano Road, Suite 206 

Dallas, Texas 75238 

(214) 343-1328 
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Wolf Whistle 

Editor's Note— We at Commander 
would like to give Neil Harris, Editor of 
the Commodore Magazine, credit for 
the "Wolf Whistle" listing in "CB2 
Sound" written by Louis Sanders, 
which was published in our December 
Premier Issue. 



Answers to White 
Flashes on the Screen 

Dear People: 

In response to Vincent J. Monney, 
Jr.'s article in Bits & Pieces— Vincent's 
problem with white flashes when his 
64 is in the RUN mode may be cured 
by replacing the 6510 Microprocessor. 
I had a similar problem. The chip is 
easily replaced if you are careful or 
take it to your service center and have 
them do it. 

Sincerely, Richard Medrano, 3310 
Kimber Court 133, San Jose, CA 
95124. □ 

In your March/April issue, in the Bits 
& Pieces department on page 42, a 
reader asked about ,l . . . enormous 
white flashes on the screen whenever 
the computer is running." 

This reader can take his/her 64 to 
the nearest Commodore repair facility 
to get the unit repaired. The repair per- 
son will be adding a .33 ut capacitor 
onto the circuit board to remove this 
problem. 

This modification is already done on 
current production units and will be 
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done at no charge to the customers on 
part production modules. 
Regards, Tony LaMartma 



Selective Keyboard 
Entry for Commodore 64 

REF: Appendix M, page 429 of the 
Commodore 64 Programmers Refer- 
ence Guide— I/O Ports (PRA, PRB, 
DDRA, DDRB). 

PRA/PRB— Peripheral Register. Ac- 
tual I/O Port. 

DDRA/DDRB— Data Direction Reg- 
ister. Controls which pins of the peri- 
pheral registers are Input and Output. 

A) If a BIT in the DDR is set to a one 
(1), the corresponding BIT in the PR 
is an Output. 

B) If a BIT in the DDR is set to a zero 
(0), the corresponding BIT in the PR 
is an Input. 



Example 



DDR 10 10 10 10 



PR 



OUT IN OUT 



OUT IN OUT IN 



Example of 

Selective Keyboard Entry 

JSR 



i 



LDA 
STA 



#$00 
$DC03 



LDA #$FF 

STA $DC02 DDRA (Output) All 

LDA #$F7 

STA $DC00 PRA (enable row 3) 

LDA SDC01 PRB 

CMP #$F7 is the "8" key 
depressed 
i-BNE $ 

JSR $ 

4>LDA #$FF < — 

STA SDC00 PRA 

RTS 



SUBROUTINE 



<-l 



Keyboard Selective Entry 

"May only be used in a machine 
language routine. 

1) Set DDRB to Input. SDC03 = $00 

2) Set DDRA to Output. 
$DC02 = $FF 

3) Enable selected row by placing a 
zero in the corresponding PRA BIT 
position. SDC00?? 

4) Read PRB and Compare to value 
corresponding to select key entry 
CMP SDC01 ?? 

5) Decide action to take 

6) Clear PRA $DC00 = FF 

7) Return from subroutine 

Note- 
When key is depressed on a 
selected row, the corresponding BIT 
in the PRB will go low (G). All other BITS 
will remain high (1). 

Sincerely, 
Joseph E. Albritton 



DDRB (Input) All 



Of * 



MSB 



LSB 



COLUMN 
READ 
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tit 
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ROW 
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PRA OUTPUT 

$DC0 

DDRA = 

$DC02 = $FF 
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SPC 
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HME 
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A 



D 



CTRL 
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~7TT 
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PRB INPUT 
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SDC03 = $00 
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Our "64-PENCIL" Is a 100% MACHINE LANGUAGE high-res 
sketch pad designed for the Commodore 64 microcomputer. 

Design, store and print high quality drawings, game back- 
grounds, maps, blueprints, etc., using the PENCIL'S convenient 
special features: 




• Concise single-key command 
format and documentation enables 
use by children and laymen. 

• Precise manipulation of the "pencil" 
sprite with Joystick and fire button 

» 10 drawing speeds for flexibility 
and detail 

» 16 pencil and 16 pad colors 
» Special "block-shuttle" sprite 
feature for rapid block-by-block 
duplication and translation of 



• High-res and block erase modes 
for both line and color corrections 

• Hard copy Is obtained rapidly 
with the Integral "DUNGENESS 
DUMP/' our machine coded high- 
res bit map dump for the CBM 1525 
graphic printer 

• Images saved to disk or tape 

• Full Commodore character set 
(Including graphics) con be 
accessed and transposed to 
Images 



Specify Disc 
or Tape 



Send check or money order for $24.95 to: 

DUNGENESS SOFTWARE 
323 Lotzgesell Road 
Sequim,WA 98382 



FREE 

Catalog 

Included I 
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Commodore 64 is a trademark oi Commodore Business Machines 

VisiCalc is a trademark of VislCorp. 

Calc Result is a trademark of Handic Software, AB, 
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News Releases 



marketing a la carte 

Donald E. Rosner recently joined 
marketing a la carte as a partner 
Previously, Rosner was with CAPEX 
CORPORATION for 13 years as a Vice 
President. CAPEX (now Computer 
Associates) is a major supplier of soft- 
ware to the large-scale IBM computer 
users. During Rosner's career with 
Capex he had numerous responsibil- 
ities including marketing, sales, long 
range planning, and product 
acquisitions. 

"The addition of Don Rosner to 
marketing a la carte gives us exper 
tise in some very specialized software 
marketing areas, such as software 
distribution, acquisitions, and long 
range planning," explains Barbara J. 
Walter, partner and company founder. 

marketing a la carte offers market 
ing and sales services to computer 
software companies. It specializes in: 

• Solving software distribution pro- 
blems for vertical markets. 

• Developing video training courses 
and video brochures for software. 

• Marketing communications pro- 
jects: brochures, newsletters, direct 
mail, advertisements, press releases, 
etc. 

• Acquiring or selling software 
products. 

• Establishing dealer incentive pro- 
grams for software companies selling 
through dealers. 

Many software companies cannot 
support a separate marketing depart- 
ment or sales force, marketing a la 
carte began business a year ago to of- 
fer sales and marketing services on an 
"a la carte" basis. In addition, it offers 
the large software companies assist- 
ance on special marketing projects for 
which they do not have extra 
manpower. 



marketing a la carte is located at 
4929 North 43rd Street, Phoenix, AZ, 
(602) 952-2918. □ 
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Commodore Capability 

In recognition of the growing base 
of Commodore computer owners, the 
growing popularity of the VIC-20 and 
Commodore 64 and the lack of good 
software for them (particularly for the 
64), Synapse Software has establish- 
ed a line of Commodore game 
software. 

Having assigned several key de- 
signers to the project, Synapse will be 
releasing 8 Commodore compatible 
games during the first half of 1983, 
primarily in April and May. All the 
games are updates and improve- 
ments on highly popular and suc- 
cessful Atari 400/800 products. 

The line-up includes: Astropatrol, 
Fort Apocalypse, Gridworld, Drelbs, 
Survivor, Slamball, Pharoah's Curse, 
and Harrier, and will receive extensive, 
separate advertising support. 

Synapse Commodore products will 
all remain faithful to the graphic ex- 
cellence, challenge and payability that 
distinguish their other games; all will 
broaden the rather narrow horizons of 
Commodore software currently avail- 
able; and all are guaranteed Instant 
Hits. Synapse, 5221 Central Avenue, 
Richmond, CA 94804, (415) 
527-7751.D c-r^v, ee 



"PIPES" First in Home 
Education from 
Creative Software 

Creative Software is pleased to an- 
nounce the immediate release of 



"PIPES" for the VIC-20. This home 
concept education program, design- 
ed and written by John Doering, is the 
first in a series of titles intended to 
bring the worlds of education and 
games together. 

The object of the program is to con- 
nect all of the houses in Gilroy, CA to 
the main water tower. You have just so 
much money to buy different lengths 
of pipe and you have just so many 
pieces of pipe available to you. The 
brilliant graphics and realistic sound 
make this educational piece play like 
a game while teaching children be- 
tween the ages of 6-15 the concepts 
of spatial relationships and economics. 
Adults will enjoy the strategic 
challenge of "PIPES." 

"PIPES" is a cartridge based pro- 
gram available on the Commodore 
VIC-20 and will be available for the 
Commodore 64 by late 1983. 

Creative Software, dedicated to 
publishing a full-line of consumer soft- 
ware programs, was founded in 1977. 
Its offices are at 230 East Caribbean 
Drive, Sunnyvale, CA 94086. C 
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Gypsy 

It's a jungle out there! Here you are, 
a happy-go-lucky bug in the garden of 
your dreams . . . you have spotted an 
especially juicy Qok tree in some 
human's back yard and decided to 
settle down to some serious leaf 
munching. 

But beware!! You are not the only 
one who considers this tree their 
home. Before you sink your teeth into 
the luscious foliage, be prepared to 
face enemies on all quarters. Nearby 
grazes the infamous Flying Ant of 
Tasmania, a stubborn and ill-tempered 
beast. He is busy about his own work, 
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but if you disturb him he will give you 
a nasty bite! 

But ants are not your greatest worry. 
There is much greater danger here. 
The Poisonous Mushrooms at the foot 
of this tree are definitely to be avoid- 
ed. Also in pursuit, the Fandango Bee, 
who has already become notorious in 
lower Sumatra because of her foul 
temper and selfish disposition. Last, 
but certainly not least of your worries, 
is the Locknest Spider who spends 
most of his time dangling from his 
sticky silk thread. 

So eat while you can. Each leaf sec- 
tion is worth points on the widely ac- 
cepted Blintz nutritional scale. The 
nectar from the flowers of Qok is also 
worth points, and you must take care 
not to travel on an empty stomach. But 
most important, avoid your predators: 
SURVIVAL is the name of the game in 
Gypsy. 

For the: Atari 4/800 Diskette + 
Joystick, 32K: $26. Atari 4/800 
Cassette + Joystick, 16K: $21. Tl 
99/4A Cassette available later this 
spring! 

Microcomputer Games, 4517 Har- 
ford Rd., Baltimore, MD 21214. U 
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New for Apple lie RGB 
Color Board 

A new video board that provides the 
Apple Me computer with RGB 
(red/green/blue) video signals that 
enhance the resolution and color quali- 
ty of the supplied composite video, is 
now available. The board can be us- 
ed with 80 column text so that color 
graphics and text are displayed on 
one RGB Monitor. In addition, each 
text line can be set to any one of 8 col- 
ors on any of 8 colors of background. 
SYNC signals are ± TTL composite or 
± TTL separate horizontal and vertical, 
for universal RGB Monitor compatibili- 
ty. The board plus into slot #7 and 
comes with 5' of ribbon cable for 
signal output. Optional cable connec- 
tor and longer length cable is 
available. 

Model VCB-2e-$1 69.00; Model 
VCB-A2, with VSS-80 RGB/80 column 
soft switch, is available for the Apple 
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Commodore Computers 
Used to Teach Preschoolers 



Preschoolers are stepping into the 
future as they use the Commodore 
PET and the Commodore 64 to 
develop basic skills. The children, 
ages three to six, attend Kmdercare 
Learning Centers in three cities, Min- 
neapolis, Ml; Houston, TX; and Mont- 
gomery, AL, where an innovative com- 
puter learning program is available. 

Since the preschoolers do not yet 
read, they are given directions by a 
natural voice recording played on a 
tape recorder connected to the com- 
puter. The children who use a light pen 
to answer questions, are being taught 
pre-math and pre-reading concepts 
memory skills, colors, shapes, and 
concepts such as over/under. 

Working with Fisher Scientific, Inc., 
a Commodore Dealer specializing in 

Mailing List for the VIC- 

Galactic Software announces the 
availability of the '20 Mailing List which 
gives the VIC user professional quali- 
ty, low-priced software. 

The '20 Mailing List comes in two 
versions: one for tape and one for disk. 
Both come in attractive binders with 
complete documentation. 

The '20 Mailing List gives you capa- 
bilities reaching into alphabetizing 
upon entry, sorting and searching on 
all fields, printing labels and printing 
complete records. With each record 



educational sales, Kindercare, the 
largest nationwide childcare facility, 
started using the Commodore PET to 
teach preschoolers in June of 1 982 at 
eight centers in Minneapolis. As this 
advanced educational technique pro- 
ved to be successful, the program was 
expanded to 35 centers in Houston. 
The program has been accepted 
with enthusiasm by both parents and 
students. The Commodore computers 
have proved to be so reliable and suc- 
cessful as a teaching tool that in 
January of 1 983, the program was ex- 
panded once more and the Com- 
modore 64 was installed in 1 1 centers 
in the Montgomery, AL area. Commo- 
dore Business Machines, Inc., 487 
Devon Park Drive, Wayne, PA 
19087.D ci/^no 92 
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containing Name, Address, City, State, 
Zip, three comment fields, you not only 
have a complete mailing list but a small 
data base manager. 

The '20 Mailing List is completely 
menu driven and user friendly. It will 
run on any VIC that has a 16K or more 
expander. 

The price is $25.95 for tape and 
$27.95 for the disk version. 

Contact: Galactic Software, PO Box 
10516, San Jose, CA 95157, (408) 
247-4434. □ &&M 93 




It's Time for 
TOTL SOFTWARE! 

for the VIC 20™ and COMMODORE 64™ 

WORD PROCESSING AND MAILING LIST & LABEL 
now available wltH QfflCKSPEED 

FAST PRINTING • LIGHTNING LOADS • SIMPLE COMMANDS 



TOTL.TEXT 2.0 + CS VIC + 8K expansion $25.00 

TOTL.TEXT 2.5 + CS VIC + 16K expansion $35.00 

TOTL.TEXT 2.6 + CS Commodore 64 $40.00 

TOTLLABEL 2.1 +CS VIC+ 16K expansion $20.00 

TOTL. LABEL 2.6 + CS Commodore 64 $20.00 

TOTL TIME MANAGER 2.1 VIC + 8K expansion $30.00 

TOTL TIME MANAGER 2.6 Commodore 64 $35.00 

time management, scheduling, reports 

RESEARCH ASSISTANT 2.0 VIC + 8K expansion $30.00 

RESEARCH ASSISTANT 2.0 Commodore 64 $35.00 

key word cross-reference research tool 

TOTL.BUSINESS 3.0 VIC + 16K expansion $85.00 

TOTL. BUSINESS 3.6 Commodore 64 $95.00 

business programs require disk and are shipped on disk 

One Megabyte Fuzzy Diskette $25.00 

computer novelty pillow 



All programs work with 40/80 column (VIC) and 80 
column (64) adapters — compatible with tape or disk 
systems —shipped on cassette tape— available 
on disk $4.00 extra. 

Quality You Can Afford 

Available at your local dealer 
or by phone order 
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TOTL 

software inc. 

1555 Third Ave., Walnut Creek, CA 94596 
)$$ ^^^Si CaH < 415 ) 943-7877 
Commodore 64 and VIC 20 are registered trademarks of Commodore Electronics, Ltd. 




24K 



MEMORY 

EXPANSION 

BOARD 



(ft VIC-20" 

ORDER FACTORY DIRECT 

$119.95 

ADD $2.00 FOR POSTAGE & HANDLING 
TEXAS RESIDENTS ADD 5% SALES TAX 

• PLUGS INSIDE VIC-20 

LEAVES EXPANSION SLOT FREE 
-USES HIGHEST QUALITY PARTS 

90 DAY WARRANTY 

COMPLETELY ASSEMBLED 

NO SOLDERING 

Dunamic Technologies 

2104 CHALICE ROAD 
ARLINGTON, TEXAS 76014 

(817) 261-8363 

VIC-20 is a registered TM of Commodore Business Machines 




Don't just save money at 
K-12 MicroMedia's Software Sale 

Because of our recent r « . « ■ 

high volume purchase of ~ MsBBTn OOntBtnlTtg. 

Creative Computing's 

best educational and game software, we can offer you these 
well reviewed programs well below list price for free no-risk 
30-day evaluation. So if you've been waiting for a chance 
to try before you buy you've come to the right 
ad. And, because we have better things to 
do with our time than process a pile of re- 
turns, we're pretty sure that you're going 
to like what you see. Let us know. 

PET Programs on Cassette 

Board Games (8K). $7.00 

Conversational Games (8K) 7.00 

Ecology Simulations I ( 16K) 12.50 

Ecology Simulations II (16K) . . 12.50 

Graphic Games (8K) ... 7.00 

Haunted House Adventure (16K) . . 7.00 

Sector 3 Air Traffic Controller (24K) . . 7.00 

Social & Economic Simulations ( 16K) 12.50 

Study Made Easy (16K) 12.50 

TYucker/Streets of the City (32K) 12.50 

TRS-80 Programs on Cassette 

Air Traffic Controller ( 16K) $12.50 

Ecology Simulations II (16K) . . 12.50 

IQTest(16K). 7.00 

Social & Economic Simulations ( 16K). 12.50 

Super Invasion (32K) 7.00 

Official school purchase orders and preview requests on school letterhead 
are welcomed Individual orders must be prepaid. Include 5% for shipping 
and handling (minimum $2.00 charge). New Jersey residents include a pph 
cable 6% sales lax 



Canadan tuxte add 151 



K-12 MICROIMESm 



172 Broadway, Woodcliff Lake, N.J. 07675 (201) 391-7555 
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Use Any Cassette 
Recorder with New 
VIK-DUBBER 

The VIK-DUBBER cassette interface 
allows VIC-20 and 64 users to save 
and load data using any standard 
cassette recorder. The VIK-DUBBER 
circuitry filters and enhances the 
cassette data, virtually eliminating bad 
loads. The VIK-DUBBER also includes 
several features to allow easier cas- 
sette use. It allows you to connect two 
cassette recorders together to make 
high quality backup copies of cassette 
programs, even machine language. It 
also has an indicator light and quiet 
audible tone to help you adjust the 
cassette volume for proper use, and 
to allow you to monitor the cassette 
data. Its power is from the computer, 
so no batteries are needed. The VIK- 
DUBBER comes in an attractive case, 
tested and ready for immediate use. 
It's available for $34.95 postpaid from 
Bytesize Micro Technology, PO Box 
21 1 23, Dept. GC, Seattle, WA 981 1 1 , 



(206) 236-BYTE. Include $2.50 for 
shipping outside the US, Canada or 
Mexico. Credit card and COD cus- 
tomers can call (1-800) 227-3000 toll 
free or (1 -800) 792-3000 in CA. Ask for 
operator 225. □ ordeNo 94 



BE Software Offers 
Video Training 

Business Enhancement Software, a 
supplier of accounting systems for the 
full line of Commodore computers, an- 
nounces a major addition to its line: 
video training for customers. 

"With the addition of video support, 
we are the first micro-software com- 
pany to offer the complete product. 
When a customer leaves a computer 
store with our product, he not only gets 
the software to do the accounting, but 
he also gets the video cassette to show 
him how to use the software," said L. 
Russel Gale, President of BE Software. 
He adds, "Even our dealers get a 
complete product. We provide them 



with a five-minute video brochure that 
they can use in their stores to tell 
customers about our accounting 
software." 

BE Software feels that video support 
for customers is a necessity. "We can 
no longer expect computer stores to 
know everything about every package 
they carry," Gale explains. "The ven- 
dor has to take responsibility. We 
would like to challenge the other micro 
software vendors to follow our lead 
and provide video training for their 
products." 

In addition, BE Software has a toll 
free number that dealers and cus- 
tomers can use if they have any 
questions— (602) 271-9181. 

BE Software is a division of Merrill 
Communications, a multi-million dollar 
high technology corporation. BE Soft- 
ware has been in business since 1977, 
handling all accounting needs for the 
Commodore line, and doing it at affor- 
dable prices. The company is located 
at 2949 West Osborn Road, Phoenix, 
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For your Commodore 64 

For only $12.95 each, our CURSOR 
64 tapes are your best buy for the 
Commodore 64. They take advantage 
of the color, sound, and sprites that 
make the 64 such a delight to use. 
Most of our packages include three 
excellent Basic programs on one cas- 
sette tape. The programs are not copy 
protected, so you can look at the 
source code, and learn how to make 
the 64 do its tricks. 

We don't have room to describe all 
25 of our CURSOR 64 programs here. 
As a sample, you may want to order 
tape 64-5 with the exciting Godzilla 
program. You'll be challenged as you 
try to save Tokyo from from the ram- 
paging Godzilla. Or try tape 64-3 with 
the popular Miser text adventure that 
will take you hours to solve (even if you 
cheat and read the program source). 

We have super programs for the 
VIC 20, such as Dungeon ($12.95), a 
visual adventure for 16K VICs. Our 
VIXEL programs are also popular with 
VIC owners. And, we still sell all 30 of 
the original CURSOR cassettes for the 
original PET and CBM. 

Call or write for a catalog today. Be 
sure and tell us whether you have a 64, 
a VIC, or a PET. We welcome credit 
cards, and ship most orders the same 
day they are received. Dealer inquiries 
invited. 

CURSOR 64, Box 6905 

Santa Barbara, CA 93110 

805-683-1585 



Circle No 66 



I C0KH0D0RE 64 | 
CIR-KIT ENGINEERING 
ANNOUNCES 



VIC 20 - SUPER EXPANDER BOARD (V"-:"4) w/QUICKSET 

. Pour Independently Switchable EjtpiandlolJ Slots 

. Quickset 'rion~t, Swi^h 

. Power ?uco Protected 

. tfflejf Power Supply Connection 

. Gold Pl&ttd ?CB Edge Connectors 

. Highest :,:.-l~. [ ty Ma *« r ials 



C0KH0D0RE 64 - SUPER EXPANDER BOARD (64M-1Q4? w/; - :;:-;"; 

- All The Features Of The Above VIC 20 V.'jy.ri 

. Fully Buffered - A :*■, ^jsary R^;.r-_." -it For Correct 
Operation ?rorrj T.-iia Pert 

PET/ CBM - ROM EMULATOR (PMB-l) v/BATT?RY TJATr".;? 

. All<rt#a 4k Of Write Projected RAH 

. PI ir.r> Intr Any iiC-K Socket Afccvo Screen '■'■■- ~ry 

. Standard With iJattery Bn.;kup 

. Compatible. ¥i tft Any karg« Keyboard M&cHirv? 

. lVv>; Aj A Software Dfevflopraen 1 '. Too] 

. Use To Load ROM Images At Conflicting Addressee, 
e.g.: BasicAid, Kicrcmon, Sort- Routine, El :- 

... For -i 5p---ciJil limited time vilt include * Basic 
Fo locator listing vhtcn will allow you to convert 
& execute basic prc^ratnj stored in the PMB-T. 



-AVAILABLE IN THREE ECONOMICAL FORMS- 

64 » 



1 . Fully But] t * Tested 

2. Kit Form (Al 1 . Parts lr,';:i) 
3- ?CB Only [Hi Parts) 

J-:r.d Check or Money Order to: 



$r.'-?-5 
$49-95 
$29-95 



■J -9b Z>'j.-jl 



CIR-KIT ENGINEERING 
10136 E. 96TH STREET 
INDIANAPOLIS, IN 46256 



Include Sij.OO Shipping k Handling 
Indians Residents Add 5# 3&lee Tax 

Allow 2 ' L-ays For Fersona! C.vcks 

FUTURE PRODUCTS AVAILABLE SOON - 

»ir«ej f&Pl to TAPE Cassette COPY MODULE 

EPRQM Prograac-sr 

Ext-.-rna". r^.ybnard for ii.^ir;pjs, Cuit- :, Pr 
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Micro Computer 
Interference Control 

A new 40 page catalog from Elec- 
tronic Specialists presents their line of 
computer interference control pro- 
ducts. Protective devices for smooth 
software operation include Equipment 
Isolators, AC power line filter/Suppres- 
sors, Line Voltage Regulators and AC 
Power Interrupters. 

Descriptive sections are included 
outlining particular computer problems 
and suggested solutions. Typical ap- 
plications and uses are highlighted. 
Request catalog 831. 

Contact: Electronic Specialists, Inc., 
171 South Main Street, Natick, MA 

01760, (617) 655-1532. D Crete No 96 



VIC-20 24K Memory 
Expansion Board 

A fully assembled PC Board that fits 
inside the computer, leaving the ex- 
pansion port free. Total installation time 
is less than five minutes and requires 
only a screw driver. A complete set of 
easy to follow pictorial instructions are 
included. 

Memory can be increased or de- 
creased via the selector switches 
which are accessible through the 
cassette port. With all switches in the 
"on" position, the computer has 
28,159 Free Bytes of available 
memory at power up. 

Price: $119.95 (factory direct). 

Contact: Dynamic Technologies, 
2104 Chalice Road, Arlington, TX 

7601 4. D Circle No. 97 



BASIC COMPILER 

AND ASSEMBLER 

FOR ATARP 
& COMMODORE 64 



THE BASM BASIC COMPILER AND ASSEMBLER FOR 
ATARI/COMMODORE 64 produces programs that run up to 
130 times faster than Atari/Commodore BASIC. Uses the 
syntax of BASIC with ASSEMBLY LANGUAGE data types and 
addressing modes. Has the efficiency of ASSEMBLY, but cuts 
program development time by 2 to 3 times. Produces highly 
efficient ROMable binary files. Programming features: IF- 
ELSE-ENDIF; WHILE-ENDWHILE; DEF-ENDDEF. Utility 
libraries: graphics: disc access: debugging aid. Editor in- 
cluded. Block-structured capability. Eases the transition from 
BASIC to ASSEMBLY LANGUAGE programming. Eliminate 
the tedium of calculating the logistics of ASSEMBLY Syntax. 
In-line standard 6502 ASSEMBLER. The next step in the 
evolution of the small computer BASIC language. 

Available soon for APPLE // @ 

Dealer inquiries invited. 

BASM requires 32K, disk. Price $99.95 plus $2.00 for shipping 
(add $1 .50 for C.O.D.). In Calif, add 6'/?% tax. Specif., Atari or 
Commodore. Send check or money order to: 

COMPUTER ALLIANCE 

21 115 Devonshire St . tf 132D, Chatsworth. CA9131 1 / (213)368-4089 
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C* (207)338-1410 co**odo«64= 

Software & Accessories for the VIC-20 



— CARDCO— 



CARDBOARD/6: 6 Slot Expansion VIC . 

CARDPRINT: Parallel Primer interlace (or Vic or 64 . 
CARDRITER: Light Pen with 6 good programs. Vic or 64 . 
CARDADAPTER: Piay Atari VCS Games on your Vic 
CARDBOARD'3S: sfoi exp.-fused-switched- reset button VIC 
CARDETTB1: Use standard cassette recorders on VIC/ 64 



S79.99 
S64.99 
S3I.99 
S74.99 
S31.99 
S31.99 



NEW FROM STAR MICR0NKS 
80 COLUMN THERMAL PRINTER 

NOW, A PRINTER THAT YOU CAN AFFORD 60 CPS; Friction Feed; 

Block Graphics ; Bi Directionol Print Head; ASGi + European characters. 

ONLY $179.99 Plus S8.00 Shipping and Handling 

GEMINI- 10 PRINTER ONLY $349.99 Piussio oos T h 

Interface cable for primers obove S24.99 



— HES — 



GRID RUNNER: Avoid Droids Weapons and Annihilate them . $29.99 

AGGRESSOR: Space 8arile - Nine Levels VIC S29.99 

PROTECTOR: Transport Citizens to Safety in New City . .'1 . 533.99 

SHAMUS: Search Rooms lor the Shadow - Avoid Droids V. 529.99 

QUEEN'S BEDROOM: Look -lor Royal Treasure - Avoid Guards 529.99 

ROBOT PANIC; Battle your way through the Cosmos . V. . S29.99 

PIRATES PERIL: Adventure - Sensational Sound & Animation . S29.99 

HES MON: Mach Language Monitor - Assembler ...VIC/64 $29.99 

HES WRITER: Surprisingly Complete Word Processing Can . j 2 9 99 

— VIC-20 COMPUTER — 

OILY $119.99 plus $10 00 shippings handling 



— CREATIVE SOFTWARE — 



TERRAGUARD: Destroy the aliens belore they land . . VIC 529.99 
SPILLS & FILLS: Develop rano and perspective skw-Jun W. S29.99 
PIPES: Hook all homes to water with limited pipe & cash . ? 1 . $29.99 
VIDEOMANIA: Kill aliens with zapper bf'-"p "-ey get you . . V. S29.99 
RAT HOTEL: Move Irom top to bottom !.c-_-- -watch Waldo V S29.99 
APPLE PANIC: Set Traps for Deadly Apples Before they get you . S29.99 
ASTRO BUTZ:Uke Defender -Creative Computing Rates this «*t . S29.99 
BLACK HOLE: Avoid Space Debns & Gravity ol Black Hole P S29.99 
CHOPUFTER: Fight off Jets. Tanks. Sams to Rescue Hostages S29.99 

SERPENTINE: Battle ol the Serpents * S29.99 

HOUSEHOLD FINANCE: 2 Tapes - 4 Programs * *24.99 

LOAN ANALYZER: Loan Calculations - Amortization Table ." S12.99 



SKYLIGHT SOFTWARE 

TAPE 4 1 - Canon Due! - Breakout - Runaround - Siockcar - Space 

TAPE #2 - Target Pistol - Space Duel - B29 - Tank - Roadblock 

TAPE #3 - Sub Hunt - Blockade - Indy 500 - UFO - Jungle Driver 

TAPES KM. #2, 03ONLYS9.99 EACH 

VIC GAME UBRARY - ALL 15 GAMES ON ONE TAPE $25.00 
Vc Information Management - 10 Commands . . ' S12.99 

NEW! COMMODORE 64 LIBRARY-DISK ONLY $29.99 

BOMBER - POKER - BLACKJACK — 3D MAZE — TREASURE 

ISLE ADV — 64 DATA MANAGER — SPRITE AID 

FLIGHT SIMULATOR - 3 MILE ISLAND 



— MISCELLANEOUS- 



QUICK BROWN FOX: Professional Word Processing Cart VIC/ 64 S49. 
TOTL. TEXT 2.0: Cass - Basic Word Processor . . . VIC/64 S19. 
TOTL TEXT 2.5: Cass -Advanced Word Processor -Req 8KExp . S27. 

TOTL LABEL: Cass -Mailing List .VIC/64 $16. 

RESEARCH ASSISTANT: Cass -Noiekeepng Irr Term Papers, etc . $24, 

ROAD TOAD: Cass - Lke Frogger VIC ...S16, 

MILLIPEDE: Cass - L.ke Centipede •» . . .516 



. 519. 

. 524, 
524 
$109, 
S109. 



GALACTIC BLITZ: Cass. - 15 Drtlerent Patterns . . . ?? 

SIDEWINDER: Cass. - 8K Exp. Required " . 

SWARM: Cass. - The lastest you ve seen ** . 

WRITER'S ASSISTANT: Powerful Disk Bosed Word Processor . 64 
FILING ASSISTANT: Data Management for all your needs 64 . . 

SPREADSHEET ASSISTANT: Visi-type software for the 64 S109. 

COMMODORE LOCO: Similar to Apple logo . 64 S89. 

VANILLA PILOT: Eosy louse languoge, VIC or 64 .... .. $29. 

PET EMULATOR: Run many PET programs on 64 $26. 

BUSINESSMAN BTCMS: General Ledger, Runs on 1 Disk 64 . . $89. 
BILL PATER BTCMS: Accounts Poyable, Aging Reports, Print Checks S89. 
BILL COLLECTOR BTCMS: Accounts Receivoble, Print Statements. . . S89. 
PAYMASTER BTCMS: Payroll System, Prim checks. Payroll register S89. 

DUNGEONS OF KAL: Adventure - Cass VIC . . S 9. 

BASEBALL: Cass. - Manage any Team in History . .*» .5 9. 
FOOTBALL: Cass. -Req. 8K E*p. -All 81 NFL Teams*'. $12. 
GALACTIC CONQUEST: Req. 8K Exp -Strategy Game- 1 to 6 S 9. 
MARTIAN RAIDER: intergalactc ships in attack on Mars V . . $16. 
SHARK TRAP: Snare the sharks with atomic net or die >' $16. 
MULTI-SOUND SYNTHESISER: Compose your own kind ot music SI 6. 

ANNIHILATOR: Like Defender VIC/ 64 j, 7 . 

KONGO KONG: Like Donkey Kong VIC/ 64 j 17- 

ADVENTURE PACK 1:5 Adventures VIC/ 64 517 ', 

ADVENTURE PACK II: 5 Adventures VIC/64 $l7 , 

CRAVE ROBBERS: Graphic Adveniure VIC/64 w\ 

ADD $2.00 FOR SHIPPING & HANDLING 
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New Products 



Quality Software From Scientific Educational Software 



Multiplication Tables— Practice 
multiplication tables or administer a 
timed test. The test problems are 
presented in random order and the 
score is displayed at the end. Fun and 
easy to use. Does not require memory 
expansion. Order #1. $7.95. 

Numeric Keypad I— Keypad and 
software that allow easy entry of 
numeric data into VIC-20. Enhances 
the VIC as a scientific and business 
tool. Requires no modification of the 
VIC. Contains automatic error detec- 
tion and allows user to display, print, 
change, or delete entries. Develop 
your software around this device for ef- 
ficient operation. Requires 8K memory 
expansion. Use with or without printer. 
Order #2. $39.95. 

Numeric Keypad II— Similar to 
above but utilizes a heavy-duty 
keypad that is easy to use for extend- 
ed periods in the home, office, school, 
or laboratory. Software allows you to 
save data files on tape for use later or 
to feed into your existing software with 
only minor modification; instructions 
provided. Requires 8K memory ex- 
pansion. Use with or without printer. 
Order #3. $69.95. 

Joystick Repair Kit— Contains the 
parts that break or wear out most 
frequently on Commodore or Atari 
joysticks. Use with your existing cord 
and base. Have one on hand when 
you need it. Available in black. Order 
#4. $3.95. 

Mean, Standard Deviation, and 
Variance— Program calculates the 
mean, standard deviation, and vari- 
ance of sets of numbers entered via 
keyboard. This program will run on the 
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VIC with or without memory expan- 
sion. Order #104. $8.95. 
Pearson r Correlation— r can be 

calculated for data entered by key- 
board or from page. Program features 
mistake correction option for data en- 
tries. Enables user to save data files on 
tape. Printer is recommended but not 
required. Order #106. $15.95. 

Super Randomizer— Program 
generates random numbers within a 
range specified by the user. User can 
specify integers, or real numbers and 
sample with or without duplication. 
Runs with or without memory expan- 
sion. Order #109. $6.95. 

Super Checkbook Balancer- 
Program accepts as input statement 
balance, outstanding deposits, 
checks, miscellaneous charges, and 
credits. Outputs total outstanding 
deposits, total outstanding checks, 
and current account balance. Pro- 
gram features mistake correction op- 
tions on all entries, and will run without 
memory expansion. Order #131. 
$8.95. 

Histogram Identification Task— 
This three minute task was design- 
ed to assess the level of cognitive pro- 
cessing associated with spatial 
manipulations. The program requires 
the user to determine if a user- 
selectable number of histograms 
matches target histograms previously 
displayed at a different orientation. 
Response times, mean response 
times, standard deviation, user 
responses, histogram orientation and 
heights are recorded. Sixteen targets 
and sixteen comparison histograms 
are presented during a run. Randomi- 



tion reduces the liklihood of ad- 
ministering identical histograms more 
than once during each running of the 
task. Requires 8K memory expansion. 
Order #144. $19.95. 

Probability Change Detection 
Program— This three minute task 
was developed to determine the 
minimum amount of change from ran- 
dom probability that is required for 
detection by the user. Up to four dials 
are presented on the screen with 
pointers that move in random fashion 
until a bias occurs to which the sub- 
ject responds. User presses the key 
with the number of the dial on which 
the bias is present. Bias occurrences, 
subject responses and reaction times 
are recorded. Requires 8K memory 
expansion. Order #145. $19.95. 

Item Categorization Task— This 
task is designed to assess the levels 
of cognitive processing associated 
with discriminating two objects or items 
when three rules are used for classify- 
ing the objects. Response times, 
means, standard deviations, stimulus 
items, stimuli, and user responses are 
recorded and displayed. 32 items are 
presented per trial. Duration of this 
task depends on user response times. 
Requires 8K memory expansion. 
Order #146. $19.95. 

Gas Mileage Calculator— Program 
requires as input car mileage at 
previous fill-up, mileage at current 
at previous fillup, mileage at current 
fillup, and the number of gallons or 
litres at current fillup. Subsequent 
calculations require only current 
mileage and current quantity at fillup 
since previous information is saved on 



tape. Runs with or without memory ex- 
pansion. Order #152. $7.95. 

Address Label Maker— Program 
prints address labels and stores lists 
on tape for economical preparation of 
mailings. Great for churches and 
clubs. VIC 1515 or 1525 printer re- 
quired. Memory expansion not re- 
quired for up to 30 average length ad- 
dresses. Order #180. $10.95. 

All software is provided on high 
quality computer-grade cassettes. 

Products warranted against defects 
in materials and workmanship for 90 
days. Claims handled on an exchange 
basis during warranty period. 

No minimum order. No charge for 
shipping and handling. 

Programs are for Commodore 
VIC-20 only. 

Orders accompanied with money 
order or cashiers check are filled within 
24 hours. Otherwise allow 4 to 6 
weeks. 

Ohio residents please add 5V2% 
sales tax. 

VIC-20 is a registered trademark of 
Commodore Business Machines. 

ATARI is a registered trademark of 
ATARI, INC. 

Write for quotes concerning custom 
modification of products to suit your 
specific needs: Scientific & Education- 
al Software, Inc., PO Box 54, Dayton, 

OH 45420. □ Circle No 66 



Fun and Adventure 
with New 
Microcomputer Game 

Responding to diverse customers' 
demands, Avalon Hill introduces a 
new adventure game for play on the 
most popular Personal Home 
Computers. 

Space Station Zulu is an outpost of 
a peace-loving civilized race called 
Yargs. You think, just another routine 
tour, as you settle back into the plush 
comfort of the captain's chair. 

ALARM! You're jolted to your 
senses. Suddenly, the bridge is a 
pandemonium. The disturbing 
message says: ALIENS ABOARD! 
Quickly you instruct your tough robots 
to engage the aliens. Some reports are 
filtering back. A robot in Landing Dock 



3 reports a large concentration of what 
appears to be larva-stage aliens. In 
room B, Sgt. Olmn announces the 
presence of several large life forms 
that appear to be scattering spores. 
The situation looks grim. Certainly, 
success will depend on your daring, 
cunning, tactics and ability to make 
quick decisions. 

Space Station Zulu is ready to run 
in diskette form on the Apple II and 
Atari 800 computers with 48K 
memory. The price is $25 each. The 
cassette version is available for Atari 
400/800 with 32K, at $20. 

We commend Avalon Hill on this 
new software. This gamemaker is 
answering its sci-fi hungry customers' 
demands with this new solitare adven- 
ture game from the microcomputer 
division. 

The Avalon Hill Game Company, 
4517 Harford Rd., Baltimore, MD 
21214, (301) 254-5300. Z c.rcie no. 6/ 



3 Programs to 
Create and Play Music 

Melody Writer— Melody Writer 
allows the user to type in sheet music 
using up to three voices and save the 
data on disk for future recall and 
editing. Melody Writer also includes a 
compiler program, which converts the 
sheet music into frequency and dura- 
tion note tables, which Player utilitzes 
in constructing its data tables. Melody 
Writer allows the user a standard piano 
keyboard range: eight octaves, 12 
notes per octave (equal tempered 
scale). Furthermore, the user can 
specify a tempo, which adjusts the 
duration of each note. Notes and rests 
can be programmed from whole to 
thirty-second in duration, including 
dotted notes. Provisions for sharps are 
also included. (Flats must be translated 
to sharps.) 

The music data is stored on disk with 
a file name specified by the user. 
When compiling the data, the music 
data file and the voice data file must 
be specified. The compiled version is 
then saved out to disk. 

Voice Programmer— This program 
is used to define the waveform, attack 
/decay, sustain/release settings of 



each of the three voices, and filter con- 
trols for the voices. (Also includes 
ring/sync/gate). The data can be 
saved and recalled from disk. Voice 
Programmer utilizes a ° graphics 
equalizer display to define the various 
on/off options. The keys f1, f3, f5, f7 
select the waveform. The keys 4-7 
select the voice and filter, 8 saves the 
data on disk and 9 recalls it. In addi- 
tion, the keyboard is configured to the 
fifth octave, with the °a° key assign- 
ed to middle C, through the °1°key, 
assigned to D in the sixth octave. 
Sharps are also represented. (C# is 
assigned to the °w° key). This allows 
the user to sample the tonal quality of 
the voice and filter settings. 

Player— Taking from the disk the 
compiled version created in Melody 
Maker or Sound Compuser, Player 
constructs a data table in memory, 
and executes a machine language 
subroutine which plays the piece. The 
subroutine is constructed so that any 
parameter of the SID can be repro- 
grammed at any 1 /60 second interval, 
giving the user great flexibility in sound 
effect. 

These programs are separated from 
one another so that the memory of the 
64 can be used most effectively- 
storing data. 

All three programs on disk or tape 
for only $24.95. Contact your local 
dealer or Skyles Electric Works, 231 E 
South Whisman Road, Mountain View, 
CA 94041 (415) 965-1735. U r - N se 



TAXQWIK® Overview 

TAXQWIK® , intended for use by 
professional consultants and tax 

accountants, has been created with 
the ability to process the following 
forms and schedules— 1040, 1040 
Estimated Tax— Lettered Schedules: 
A, B, C, D, E, F, G, SE, W-Num 
bered Forms: 3903— Moving Expen- 
ses, 2106— Employee Business Ex- 
pense, 2441— Child Care Credit, 
3468— Investment Credit 5695— 
Home Energy Credit, 2210— Under- 
payment of Estimated Tax, 4562— 
Depreciation. 

TAXQWIK® enables productivity 
increases in every phase of tax prepar- 
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ation; actual preparation of the return, 
checking and editing of the return, and 
printing and assembling of the com- 
pleted return. 

For example Income Averaging, a 
method of tax computation involving 
averaging the current year's taxable 
income with the taxable income for the 
four prior years can be computed in 
less than a minute. 

The program also makes simultane- 
ous comparisons of a client's joint 
return with the same client's return fil- 
ed on a married, filing separately 
basis. Using income averaging as a 
base, the client can then decide which 
approach will better satisfy his individ- 
ual tax requirements. 

TAXQWIK® will also provide you 
with the ability to process the follow- 
ing State's returns— New York, New 
Jersey, Pennsylvania, California, Flor- 
ida, Iowa. 

TAXQWIK® prints directly onto the 
Federal Forms with the option of im- 
mediate as well as batch printing. 

TAXQWIK® , The Tax Prepara- 
tion System, is well documented and 
easy to use. This program has been 
in use for more than 6 years. 
Specifications 

Equipment Requirements— 8032, 
8050, 4040 Full Range of Printers. 

Language— Complied Basic. 

Storage Capacity— 68 Complex 
Returns (8050) 150 Simple Returns. 

Utilities— Format a New File Disk, 
Back-Up Your Diskette, Validation of 
Date, Look-Up/Print Client File, Clear 
Memory. 

For more information write or call 
Geneva Technologies Corp., 1 4 Com- 
merce Drive, Cranford, NJ 07016, 

(201) 276-11 44, D Circle No. 70 



System III 
Accounting System 

The System III Accounting System 
is a fully interactive general accounting 
system designed for the first-time user. 
It is especially useful for the small 
business that has fairly large demands 
for printing, and whose files of ac- 
counts, customers, vendors, employ- 
ees, and invoices are significant. 
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All input requests are fully prompted 
with complete verification of input data. 
Most reports may be printed either to 
the screen or the printer and started 
or stopped at any point. The user is led 
completely through each function by 
a series of highlighted prompts, fully 
explaining the required input at each 
point. 

A professionally written instruction 
manual is included, which shows sam- 
ple reports generated by the system. 
Further explanations of each step and 
prompt as it is encountered by the 
user, together with the reports, make 
the system extremely user-friendly. 

The System III contains File- 
Guard™ I to protect irreplaceable 
data files, assuring the user that all 
data files will remain intact, even if elec- 
trical power is lost. 

The System III, when used with an 
8050 Disk Drive (or larger), requires 
only one disk for all programs and 
allows the user to have either a single 
or multiple data disks. The configura- 
tion later may be changed by the user. 
The system will interface all modules 
together, if so desired by the user. 

The system may begin with less than 
all of the available modules and have 
the other modules added later. System 
III can be upgraded to System IV. 

Computer Requirements: Commo- 
dore 8032, 8096 or SuperPET. 

Suggested Configuration: 8032 
Computer, 8050 Disk Drive, 4022 
Printer. 

Alternative Disk Versions: 4040 Disk 
Drive, 8250 Disk Drive, Corvus. 

Contact: Southern Solutions, PO 
Box P, McKmney, TX 75069. □ 
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System IV 
Accounting System 

The System IV Accounting System 
is a fully interactive general accounting 
system designed for the larger busi- 
ness user, especially those who must 
deal with large figures, $1 million up 
to $1 billion. It provides more modules 
for a wider variety of applications. The 
most significant feature of the system 
is SuperMath™, allowing entry and 
use of numbers up to one billion 
dollars and providing calculation ac- 



curacy of larger numbers not available 
in smaller systems. 

Most reports may be printed either 
to the screen or the printer and started 
or stopped at any point. The system 
provides to options of printer widths to 
accommodate most printers in use: 80 
and 130 columns. All input requests 
are fully prompted with complete veri- 
fication of input data. The user is led 
completely through each function by 
a series of highlighted prompts, fully 
explaining the required input at each 
point. 

A professionally written instruction 
manual is included, which shows sam- 
ple reports generated by the system. 
Further explanations of each step and 
prompt as it is encountered by the 
user, together with the reports, make 
the system extremely user-friendly. 

The System IV contains FileGuard™ 
II to protect irreplaceable data files, 
assuring the user that not only will all 
data files remain intact should elec- 
trical power be lost, but also that in- 
terim posting data is retained and 
available as processing is restarted 
and continued. 

The System IV, when used with an 
8250 Disk Drive (or larger), requires 
only one disk for all programs and 
allows the user to have either a single 
or multiple data disks. The configura- 
tion later may be changed by the user. 
Double 8050 Disk Drive units may also 
be used and one 8050 with some pos- 
sible disk interchange is also support- 
ed. The system will interface all mod- 
ules together, if so desired by the user. 

The system may begin with less than 
all of the available modules and have 
the other modules added later. Just as 
both the Commodore 64 Business- 
Ware and System III from Southern 
Solutions can be upgraded to System 
IV will be able to be upgraded to future 
larger systems from Southern Solu- 
tions. 

Computer Requirements: 8032, 
8096 or SuperPET Computer. 

Suggested Configuration: 8032 
Computer, 8250 Disk Drive, Mannes- 
mann-Talley 8024-L Printer. 

Alternative Disk Versions: 8050 Disk 
Drive and Corvus. 

Contact: Southern Solutions, PO 
Box P, McKinney, TX 75069. D 
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YES! Publishes 
Unique New Guide 

A new guide to the rapidly expand- 
ing field of microcomputer books has 
just been published by Yes! Inc., for 
the Yes! Bookshop in Washington, DC. 
Entitled Computers: A Comprehensive 
Guide, this 64-page annotated bibli- 
ography contains short, critical reviews 
of over 800 of the best microcomputer 
books published to date. 

The books in the guide are arrang- 
ed by 26 separate topics. These range 
from the philosophical— such as arti- 
ficial intelligence, computers and 
society— the the practical— such as 
business applications, programming 
languages, assembly languages and 
microprocessors, and machine- 
specific hardware and software. 

Each book is critically reviewed by 
Cris Poponoe, manager of the Yes! 
Bookshop and author of the highly- 
acclaimed Yes! Bookshop Guides, 
Inner Development and Wellness 
(both distributed by Random House). 
Popenoe's clear, concise style— and 
obvious love of computers— makes 
reading the guide an informative and 
pleasurable experience. For those 
who have difficulty choosing, a few 
books in each topic are specially 
recommended for their superiority in 
content and presentation. 

All of the books reviewed are 
regularly stocked by the Yes! 
Bookshop and are available through 
its world-wide mail order service. Com- 
plete information, including order 
forms, is included in the guide. For 
over seven years, the Yes! Bookshop 
has been providing its thousands of 
mail order customers with fast, effi- 
cient, personal service. This includes 
helping them with special orders and 
sending them free, fully annotated up- 
dates of the new books in their fields 
as they are published. 

Computers: A Comprehensive 
Guide is priced at $2, postpaid, (refun- 
dable with the first book order) and is 
available from: Yes! Bookshop, 
1035-3 1st Street NW, Washington, DC 
20007,(202)338-2727.0 circle no 72 




FIVE POWERFUL SOFTWARE 
DEVELOPMENT TOOLS 

Plus Zhe Exciting ftew Book 

INSIDE THE COMMODORE 64" 



THE BOOK 

A complete clear explanation of machine 
language, Assembly language, Commodore 64 
architecture, graphics, joystick and sound effect 
programming. Detailed step-by-step guide to the 
use of the development tools. How to combine 
BASIC and machine language, make auto-start 
cartridges, Interface with the Internal ROM- 
based programs of BASIC and the Kernal. 
Sample programs fully explained. 



THE TOOLS 

Assembler/Edltor/Loaderf Decoder/Monitor 
Full-featured Assembler allows use of labels, 
comments and arithmetic expressions to create 
machine language programs. Create, save, 
modify Assembly language programs with the 
Editor. Load and link machine language modules 
with the Loader. Decode machine language back 
into assembly language for study or input to the 
Editor. Single-step program execution with the 
Monitor. Combines Assembler/Editor for maxi- 
mum ease of use. 



ALL FOR $54.95 PLUS $2.00 POSTAGE AND HANDLING Add $5.00 for disk version. 
Send check, M.O., VISA/MC ($2.00 S.C.) or specify C.O.D. (add $3.00) to: 



mp&k 



fillkzzk 



P.O. Box 207, Cannon Falls, MN 55009 
507-263-4821 

Commodore 64™ is a registered TM of 
Commodore Business Machines Inc. 



FOX 20: 



foxscsmft 

"Crafty Software from THE FOX" 



TM 



The magazine for *VIC 20 users. On Cassette. 

The all magnetic magazine with 5 or more original programs per month. Game - Educational - Utility 
programs at an average cost of 88* per program. FOXTALES - our video newsletter haa Articles, Hints, 
Reviews and more. Delivered monthly to your door. Give your VIC 20 value and power with FOX 20. 

Texas Residents add 5% Sales Tax $53/yr. U.S. *63/yr. Cannada A Overseas $6.50 Single & Back issues 



UpryteQyter 1 



For the Commodore 64 



The user affectionate sprite development program. Menu-driven, mono/mulitcolor sprites. Joystick/key- 
board, tape/disk. 10Kw/FASTmachinelanguageroutinee. Over 60 commands: ROTATE (any angle 0-360), 
1NVERT/OBVERT, SHIR, SYMMETRY, AND/OR, REVERSE. REVIEW, MOVIE (animation). Create and edit 
up to 1 28 sprites per file. For programming efficiency and FUN! Includes the Game Maker - automatically 
prepares a base for game development 

Cassette $29.95 Disk $34.95 



FOXPACS 



Selected program collect ions for the VIC 20 and Commodore 64 • Games, Adventures, Educationals, Home 
Utilities, Programming Utilities, etc Each FOXPAC contains 4 programs on individual cassettes See 
catalog for descriptions 

$20. 

All orders pre-paid (U.S. funds). Author and Dealer inquiries invited. Send for our free catalog for more 
information on these and other fine products. 



Don't be outFOXed - Run with 

Foxsoinr 



)TM 



P.O. Box 507 

Deer Park, Texas 77536 

(713)473-6723 




A Division of Foxfire Systems, Inc. 
"VIC 20 A Commodore 64 are trademarks of Commodore Business Machines, Inc 
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BusinessWare™ 

The BusinessWare™ group of soft- 
ware for the Commodore 64 computer 
provides full-featured, computerized 
record keeping that is designed for the 
non-professional computer user, as 
well as the non-professional book- 
keeper or record manager. Although 
some packages are for home or pro- 
fessional use, most of these systems 
are perfect for the very small, or at- 
home, business. In addition, other 
businesses that have limited needs for 
heavy-duty processing will find these 
packages are ideally "in-between." 
These systems are an excellent choice 
for "step-up" systems, allowing the 
beginning computer-user the oppor- 
tunity to start using real accounting 
systems and concepts that can be 
upgraded later to a larger system, 
such as the System III or System IV. 

All systems have menus for the user 
to select various operations to be per- 
formed. The programs provide 
prompts, to which the user responds, 
to move through the operation being 
done. Each program provides reports 
and printouts that provide verification 
of proper entry and for use in com- 
municating away from the computer. 

Each program comes complete with 
a guidebook that is easy to read and 
understand. It provides complete infor- 
mation necessary for learning to use 
the system, for explanation of each 
prompt and possible alternatives, and 
for reference for as long as the system 
is used. 

These programs contain profes- 
sional level file structures developed 
for use in larger systems, but available 
at prices affordable by the smaller 
user. The user can normally configure 
the system to allow data to be stored 
on the main disk drive, a separate disk 
drive, or maximize file contents by 
trading disks in the main drive and 
storing data separately from the pro- 
grams. Historical copies of files may be 
made to the tape drive, to a second 
1541 Disk Drive or to drive 1 of the 
double drive unit. All programs contain 
FileGuard™ II, to protect the data 
files, even in the event of power failure 
during operation. 

These systems are designed for use 
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with the typical Commodore 64 con- 
figuration of equipment: the computer, 
a 1541 Disk Drive, a C2N Datasette 
Tape Drive, and a 1525 Printer. But 
some users will find they have different 
needs. These programs will support 
almost any Commodore disk drive unit 
or printer, plus the Corvus hard disk 
drives and almost any standard ASCII 
printer, assuming the user purchases 
suitable interfaces. 

Some systems will communicate 
with each other for posting or updating 
of information. All files can be transmit- 
ted through a modem to another com- 
puter by using the MailBox™ 
package and the standard VIC 
Modem or any other suitably interfac- 
ed modem. 

Contact: Southern Solutions, PO 
Box P, McKmney, TX 75069. □ 
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LearningWare™ & 
FunWare™ 

The LearningWare™ series of pro- 
grams has been designed specifical- 
ly for the Commodore 64 and VIC-20 
computers. All of the LearningWare™ 
programs will run either in the Com- 
modore 64 or the unexpanded VIC-20, 
but memory expansion may be used. 
All programs are available on disk or 
tape. 

The concept of the FunWare™ pro- 
grams is strictly to entertain. These 
programs use the high quality sprite 
and sound synthesis capabilities of the 
Commodore 64 to give hours of pleas- 
ure to the whole family. Available either 
on disk or tape. 

LearningWare™ is an educational 
set of programs ranging in subject and 
skill level, designed to supplement 
elementary, junior, and senior high 
school courses. Each program is user- 
friendly, in the Southern Solutions 
tradition, containing simple-to-read- 
and-understand prompts, and safe- 
guarded against accidental program 
exits, yet forgiving in input spelling 
errors, when appropriate. 

LearningWare™ is especially useful 
in drills, and other educational applica- 
tions requiring repetition and memori- 
zation. Students are presented with the 
data in a manner that neither intimi- 



dates, when the respondent is incor- 
rect, nor discourages, when the com- 
pleted drill test score falls below 
passing. 

Where appropriate, Learn- 
ingWare™ scores each completed 
drill, with both percentage correct, and 
letter grade. Provision is made for 
altering the letter grades to fit the 
user's grading system, which is ex- 
plained in the program documenta- 
tion. All programs also display the 
number of questions attempted, allow- 
ing the drill supervisor to consider the 
percentage relative to the students 
chosen number of questions. 

Contact: Southern Solutions, PO 
Box P, McKmney, TX 75069. □ 
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Creative Software Wants 
You to "Save New York!" 

Creative Software is pleased to an- 
nounce the release of "Save New 
York!", a game cartridge for the Com- 
modore 64, designed and written by 
Joe Jetson. This game will be available 
June 1. 

New York, more than most towns, 
has mutants. ..in the buildings, in the 
sewer system, on the streets and 
especially in the subways. You, 
defender of all that is good, must 
destroy all of the above ground and 
subterranean mutants before they 
destroy New York. 

The hardest part of "Save New 
York!" is trying to figure out why you 
would want to Save New York. 

Creative Software, is located at 230 
East Caribbean Drive, Sunnyvale, CA 
94086. (408) 745-1 655. "J odeMo 75 



Video Activated 
Power Switch for 
Remote Video Monitors 

A low cost video activated power 
switch to turn-on and turn-off video 
monitors, is now available. The switch 
detects horizontal SYNC from the 
video signal to turn the monitor, or 
other device on. In the absence of a 
video signal, the monitor or other 
device turns off. Advantages of the 
remote switch are: Saves electrical 



energy by using monitor display only 
when video signal is present; reduces 
monitor maintenance; eliminates 
distractions from free-running 
monitors; eliminates the need for 
special AC power lines or tall ladders 
to turn video monitors on/off in unusual 
locations. 

Model VSP-I— $99, mounts inside 
the monitor; Model VSP— IA— $149, 
used external to the monitor. The 
monitor power cord plugs into the 
VSP— IA, and the VSP-IA plugs into a 
source of AC power. 

Telemax, INC. 780 Lorraine Drive, 
Box 339, Warrington, PA 1 8976, (215) 
343-3000. □ c.rcu..r,„ 76 




Modem Interface— Cost- 
saving convenience 

The MODEM INTERFACE offers 
VIC-20 and C64 users the cost-saving 
convenience of connecting virtually 
any modem to their computer. The 
Modem Interface is compatible with 
the Microconnection, Smartmodem, 
CAT, etc. A 3-foot cable with a stan- 
dard DB25 connector is supplied at no 
extra charge. The Modem Interface 
allows use of your modem's autodial/ 
autoanswer features. Included with the 
Modem Interface is a free autodial ter- 
minal program. The cost is only $21 .95 
postpaid from Bytesize Micro 
Technology, PO Box 21123, Dept. 
GC, Seattle, WA 98111, 206 
236-BYTE. Include $1.75 extra for 
shipping outside the US, Canada, or 
Mexico. VISA, Mastercard, and COD 
customers can call (1-800) 227-3000 
toll free or (1 -800) 792-0990 in CA ask 
for operator 225. C a..-,-. ■, ?? 



IEEE-488 64 Digital 
Channel Data Acquisition 

Connecticut microcomputer an- 
nounces a new 64 digital line input 
module which is a self contained IEEE 
488 (GPIB) bus compatible device. It 
is the first product in the BUSSter 
series of I/O modules. 

The BUSSter A64 Digital Input 
Module accepts commands from any 
host computer through its IEEE port, 
reads and stores data from up to 64 
digital TTL level lines and then sends 
this information back to the computer. 
A BUSSter module economically in- 
creases a computer's interfacing 
capability while reducing its workload. 



Input Module 

The BUSSter A64 Digital Input 
Module is easily programmed through 
BASIC commands from the controlling 
computer. The built-in timer and buf- 
fer allows data sampling and collection 
to occur, while the host computer is 
occupied with other tasks. 

The BUSSter A64 Digital Input 
Module sells for $495.00 in standard 
version, including case and power 
supply, and is available from stock. 

Connecticut microcomputer, 36 Del 
Mar Drive, Brookfield, CT 06804, 203 
775-4595. □ Ott^m ?8 



IEEE -488 



/£S0 A64 



fiC 



TIMER 



BUFFER 



I PORT A | 
<5~ 



PORT B 



W 



PORT C 



S" 



PORT 

2> 



I PORT F | 



PORT D 



I PORT G 



<£> 



PORT H 



IEEE-488 64 DIGITAL CHANNEL DATA ACQUISITION 
INPUT MODULE 



• 64 Digital Inputs 

• Built in timer 



• Buffered 

• 2048 Byte Buffer Optional 



CeeNet 

Introduction— The CeeNet is a 

coordinated software and hardware 
package which allows up to 64 Com- 
modore VIC's and CBM 64's to be in- 
terconnected. Devices, such as disk 
drives, printers, and modems can be 
shared by all microcomputers con- 
nected to the network. In addition, 
library of application programs provide 
powerful network functions such as 



inter-network mail, terminal linking, file 
protection, and database support. 

Features and Implementation— 

The CeeNet has been designed to be 
fully extensible. That is, the system can 
be easily upgraded at any time. This 
allows users to 'start simple' and let the 
system 'grow' as their needs require. 
The sections below describe range of 
systems, starting from a simple 
system. Each network consists of a 
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number of workstations (Computers 
for use by students and teachers) and 
Shared Devices (Computers which 
provide shared resources such as a 
disk drive or printer. Each shared 
resource requires one computer). The 
total number of computers can not ex- 
ceed 64. 

The beginning system consists of 
either VIC's or CBM 64's. A shared 
disk drive provides users with a cen- 
trol library of programs. In addition, an 
application program, ADVISE, allows 
teachers to link' their computer to the 
student's computer. This allows the 
teacher to take control over the stu- 
dent's computer. Users may also send 
messages to other users via the MES- 
SAGE command. This configuration 
requires each microcomputer to have 
a network interface card; there is no 
other addition to each microcomputer. 
The network software is loaded into 
each computer at the start of each 
day. This system is ideal for applica- 
tions which require little programming 
but require that many computers have 
access to a common set of programs 
(i.e. Computer aided instruction). 
Availability— December 1982. 

The advanced beginning system in- 
cludes the VIC-TREE programming 
cartridge. This cartridge includes all 
network software in addition to a large 
set of commands which ease BASIC 
programming, editing, and de-bug- 
ging. In addition, users may add a 
shared printer. 

The intermediate system requires a 
CBM 64 to operate the shared disk 
drive. This system provides a sophisti- 
cated shared disk which supports pro- 
tected individual user accounts, group 
accounts for file sharing, database 
support, faster access to disk files, and 
a mail facility. This system is intended 
for high schools which intend to teach 
programming, word processing, and 
accounting. Availability— Spring 1983. 

The advanced system provides a 
gateway. A gateway is a method by 
which many CeeNet's can be intercon- 
nected via the telephone lines. The 
gateway requires one CBM 64 com- 
puter and a modem. Up to 255 
CeeNet's can be interconnected. This 
allows users to transfer files between 
networks. A supplied application pro- 
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gram provides file transfer operations, 
inter-network mail, and the capability 
to connect to large time-shared com- 
puters such as the SOURCE. Avail- 
ability—Summer 1983. 

Skyles Electric Works, 231 E South 
Whisman Road, Mountain View, CA 
94041, (415) 965-1 735. G oc* n= / 9 

Word Puzzles Challenge 
Fans of All Ages 

Crypto-Cube, a new educational 
computer game which provides word 
puzzle enthusiasts with exciting, imagi- 
native challenges is now available 
from DesignWare for Apple, Atari and 
IBM microcomputers. 

Designed for one or two players, 
Crypto-Cube features a cube which 
rotates, each side exposing a grid 
similar to that found in a crossword 
puzzle. Players take turns uncovering 
letters to fill in the missing words. 

Crypto-Cube encourages kids to ex- 
pand their vocabulary as well as prac- 
tice their spelling. They can also use 
the computer to create their own puz- 
zles on the computer. 

Prior to the start of each game, 
players pick one of the 50 possible 
puzzles included on the Crypto Disk, 
or create their own word list for place- 
ment on the cube by the computer's 
puzzle generator. These puzzles can 
be saved on their own disk. 

"This game is a word puzzle fan's 
dream," said James Schuyler, presi- 
dent of DesignWare, Inc. "It's lively, 
with a lot of animation and sound 
features. It stimulates children's in- 
terest in words, helps them with spell- 
ing and gives them keyboard familiar- 
ity. For adults, it's a real mind-bender, 
on a par with the best board games 
available today." 

Aimed at children eight years and 
over, Crypto-Cube will be available in 
quality computer and software stores 
nationwide in early May. Retailing for 
$39.95, the new software package 
runs on the Apple II Plus and II3, IBM 
PC, Atari 400, 800 and 1200 XL with 
48K memory and disk drive. 

Based in San Francisco, CA, 
DesignWare, Inc., develops and dis- 
tributes a full line of educational soft- 
ware. 



Contact: 1901 Avenue of the Stars, 
Los Angeles, CA 90067, (213) 

557-1331 .□ Circle No 80 

DesignWare Makes 
Learning Words Fun 
with Spellicopter Game 

Spellicopter, an action-packed 
computer-based spelling game for 
personal computers has been an- 
nounced by DesignWare, Inc., a lead- 
ing developer of educational software 
for personal computers. 

In Spellicopter, the pilot must ac- 
complish a dangerous rescue mission. 
The task requires keen memory, ver- 
bal, spelling and navigation skills. The 
goal: To rescue letters "stranded" on 
a distant field, organize them into a 
correctly spelled word and bring the 
cargo back to the helicopter's landing 
pad. 

DesignWare's new game involves 
the player in a series of actions that in- 
terrelate. Prior to takeoff, the "pilot" is 
shown a list of 20 words. One by one 
the pilot will try to rescue these words 
from the field of letters. 

As the flyer readies his helicopter, he 
is shown a sentence with the target 
word omitted. With all systems "Go", 
the pilot must fly through crowded 
skies and mountainous terrain. When 
the flyer reaches the field, he picks up 
the letters by focusing a laser beam on 
them. Correctly spelled words are car- 
ried back to the landing pad in the 
cargo bay of the helicopter. 

The pilot must pass other aircraft 
and obstacles which threaten his flight 
path. If he does not maneuver quickly 
to avoid these obstacles, his helicopter 
will run out of fuel and crash. 

"The idea behind Spellicopter is to 
provide a chance for both children and 
adults to exercise their own personal 
'spelling demons' in a motivating envi- 
ronment in which we have combined 
hand-eye coordination with a peda- 
gogically sound educational proce- 
dure," explains Jim Schuyler, presi- 
dent of DesignWare. 

Available on the Apple II + and lie, 
Atari 400, 800 and 1200 XL, and IBM 
PC with 48K memory and disk drive. 
Spellicopter retails for $39.95. The new 
game will be available in early May. 



Contact: DesignWare, 1901 Avenue 
of the Stars, Los Angeles, CA 90067, 
(213) 557-1331. □ 
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A Friendly Companion 
For You and Your VIC-20! 

Hello! My name is PAL and I am 
here to help you, the VIC-20 program- 
mer, with a wide assortment of quick 
and easy aids for programming the 
VIC-20. P-A-L stands for Program- 
mer's Aids and Logs and I hope to 
become a real 'pal' to you as well! 

Whether you are just beginning to 
learn programming on the VIC-20, or 
are a real expert, I'm sure you will find 
me a great help. My aids and logs are 
patterned after those that professional 
programmers use. But of course, they 
are designed just for you; the VIC-20 
programmer! 

PAL is not a how-to-program guide, 
nor is it a technical manual. PAL's aids 
and logs are merely a collection of 
useful VIC-20 information and 
worksheets in a very easy to use form. 

And, PAL contains the most com- 
plete collection of VIC-20 aids and logs 
to be found; ranging from simplified 
BASIC definitions to screen graphic 
design worksheets. Anyone wishing to 
write better programs, more quickly, 
without the frustration of hard to use 
reference materials will find using PAL 
invaluable. 

PAL is designed to help you locate 
that particular piece of programming 
information you need very quickly. 
PAL's aids place commonly used in- 
formation in a quick and easy to use 
form. No more page flipping thru the 
manuals! The logs help you organize 
all your other VIC-20 information, so 
that you may easily locate it as 
needed. 

PAL helps you write better pro- 
grams. You'll be more organized, 
have quicker access to VIC informa- 
tion, and your programs will be better 
designed and documented. PAL can 
help you to form a mental image of 
what you would like your program to 
do, and how it should appear. This is 
most important for writing good pro- 
grams. A program that is not well 
thought out will never be as good as 
one that is! 
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A DATA-EASE FORTHE COMMODORE 
W GOWIER INTEGRATES WITH 'THE 
MAIIER" PROGRAM. ON DISK IN VtNiyi 
BINDER tMOO 



THE MAILER 



A BUSINESS UST AND LABEL PRO- 
GRAM FOR THE COMMODORE 64 
COMPUTER. SUPPLIED ON DISK IN AN 
ATTRACTIVE 3 RING BINDER. tMQO 

EMI 

YOU'RE COMMANDER OF THE ULTI- 
MMEWARMACHINEANUCLEARSUB- 
MME DISK OR CASSETTE tyjOO 

OHOJ, 709W1SHKE DRIVE 
••■■■ Ml PROSPECT, 160056 

ftinWAK 3WM41U 

%m®wm&oi cowooobe business maoks 



A FIGHT SIMULATOR GAME FOR THE 

COMMODORE 64' COMPUTER CAS- 
SETTE OR DISK MOO 



RUNWAY -20 



A FUGHT SIMULATOR GAME FORTHE 
VIC-20* COMPUTER. REQUIRES 16K 
EXPANSION. COLOR, SOUND iJOY- 
STKX OPTION. CASSETTE $0(00 
ORDBK ™ 



SWf PILOT 



A FUGHT SIMULATOR GAME FOR THE 

COMMODORE VIC-20* COMPUTER 
CASSETTE OR DISK REQUIRES 8K 
EXPANSION. HftOO 

JOYSTICK OPTION Ig 
709 WHSHIRE DRIVE 
MT. PROSPECT, 1 60056 

SanWAH nmm 

'laSTFJEDTWEMWOfCOMMOOClIE BUSINESS MAOIhCS 
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CONNECT ANY MODEM TO 

YOUR VIC-20 OR C-64 

The MODEM INTERFACE 

allows you to connect virtually 
any standard acoustical or 




direct connect modem to 
your VIC-20 or C-64. Works 
with the Microconnection, DC Hayes or CAT. Compatible 
with autodial/autoanswer modems. No soldering, just 
plug it in. Comes with a BASIC autodial terminal 
program. $2 1 .95 Postpaid. Add $1.75 extra for shipping 
outside the U.S., Canada, or Mexico. VISA or MASTER- 
CARD welcome. 

FOR CHARGE OR C.O.D. ORDERS 



1-800-227-3800 TOLL FREE 
1-800-792-0990 IN CALIFORNIA 
ASK FOR OPERATOR 225 



For check order, additional information or service, call or write: 

BYTESIZE MICRO TECHNOLOGY 

PO BOX 21 123 - DEPT. A - SEATTLE, WA 981 1 1 

(206) 236-BYTE 

DEALER INQUIRIES WANTED 
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One look through PAL'S pages and 
you'll quickly see how they will benefit 
you and your programs. PAL is con- 
veniently printed on a tear-out pad, is 
color-coded for easy reference, and 
has been punched for a standard 
3-ring binder. 

Programming the VIC-20 is a very 
enjoyable past-time, and very educa- 
tional as well! PAL is here to help you 
write better programs, keep organiz- 
ed, and above all, have fun! 
Look what PAL contains... 

Border and screen full-color com- 
bination rainbow; EZ-Key quick guide 
to all keys and characters. Includes: 
pokes, reverses, CHR$, set 1 - set 2; 
EZ Note sound music chart and 
worksheets; BASIC-LY EZ condensed 
basic dictionary; Create-A-Character 
programmable characters worksheets; 
EZ Screen tearout screen layout and 
design forms; EZ Graph graphics pro- 
gramming aid; Doc-U-Ment program 
documentation worksheets; EZ Flow 
program flow charting worksheets; 
General Purpose programming 
worksheets; Software Listing Log 
Sheets; Tricks and Hints Log Sheets; 
Tape Cassette Log Book. 

And Even More... 

Basic-Aid* Quick Reference Card to 
basic keywords and important 
memory locations; Function-Aid* 
Templates for programmable f1-f8 
keys. (* These two mount right on your 
VIC-20!) 

95 pages of aids, worksheets and 
logs. Something for every VIC-20 pro- 
grammer! 

Data Equip. Supply Corp. Data 
Tape, 8315 East Firestone Blvd., 
Downey, CA 90241, (213)923-9361.0 
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Skyles Electric Works 
Presents The VicTree® 

The VicTree leaves your new VIC (or 
CBM 64) with 42 additional com- 
mands, branches out to most BASIC 
4.0 programs and roots into most 
printers. 

The VicTree is a coordinated hard- 
ware and software package that allows 
your VIC to branch out in unbelievable 
directions and makes it easier than 
96/Commander June 1983 



ever to do BASIC programming, de- 
bugging and to access your disk. And 
the new VicTree provides routines to 
interface the VIC to the powerful 
CeeNet local network. 8kb of ROM— 
4kb for the BASIC' commands, 4kb for 
disk commands and interfacing to 
CeeNet— plus 4kb of RAM for miscel- 
laneous storage. Perfect not only for 
the new VIC but also for the Commo- 
dore 64. Unbelievably simple to use 
and to install, the VicTree gives you all 
the additional BASIC 4.0 commands 
to allow most BASIC 4.0 programs to 
work on your new VIC or CBM 64. 

Now only $89.95— or $1 09.95 com- 
plete with Centronics standard printer 
cable. (Cable alone $29.95) Available 
now from your local dealer or order 
through your Visa or MasterCard toll 
free: (800) 227-9998 (CA, Canada, 
AK, HI, please call (415) 965-1735) or 
send check or money order directly to: 
Skyles Electric Works, 231 E South 
Whisman Road, Mountain View, CA 
94041. (415) 965-1 735. □ c.rcie No 83 

BUSIWRITER 
Now Available 

Why word processors? Word pro- 
cessors allow the user to quickly and 
easily create letters, memos, notes, 
reports, term papers, manuals, poetry 
and any other written information us- 
ing the memory of the computer as a 
pencil and paper. The computer dis- 
play or terminal acts as a window 
through which the user views the infor- 
mation as it is entered. The outstand- 
ing advantage of using BUSIWRITER 
is that it acts not only as a pencil and 
paper but as a perfect eraser and 
automatic typewriter. 
The Queen Bee of 
Word Processors 

BUSIWRITER allows the user to 
quickly and easily make any number 
of alterations to the text. BUSIWRITER 
will instantly reformat your text and 
show you exactly and continuously 
how the final output will appear. BUSI- 
WRITER has more functions than any 
other known microcomputer word pro- 
cessor. With BUSIWRITER assisting in 
the entry of text, providing a 20 page 
memory and performing an enormous 



number of editing/composing func- 
tions, the preparation of written data 
is far faster and outstandingly more ac- 
curate than if it were prepared by 
hand. 

For use with Commodore CBM 64, 
1515, 1525, Epson, C. Itoh, Qume, 
Diablo, NEC Spinwriter, Starwriter, 
Prowriter, Okidata, Microline, 
Gemini-10, and many more printers. 

BUSIWRITER 64-only $99 for the 
CBM 64. Now available from your 
local dealer. Call (800) 227-9998 for 
the name of your nearest dealer. (CA, 
Canada, AK and HI, please call (415) 
965-1735.) Skyles Electric Works, 
231 G South Whisman Road, Mountain 
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Arrow 

Six times faster cassette opera- 
tion. That's right! An inexpensive 
plug in module for the Commodore 
VIC-20 or CBM-64 that allows 6 to 7 
times faster LOAD, SAVE and VERIFY 
of BASIC and machine language pro- 
grams. In addition, we have shorten- 
ed the "leader" preceding the pro- 
gram to 4 seconds as a further speed 
up of cassette operations. 

And that's not all. It was such fun 
speeding up the LOAD, SAVE, and 
VERIFY commands that we added a 
new command ... APPEND to enable 
you to add one BASIC program to 
another. We also added a command 
to move the tape at "Fast Forward" 
speeds to one of nine specified 1 6,000 
byte areas on the tape. We also add- 
ed error detection to increase the 
reliability of cassette operations. 

Easy to use. ARROW— adds 4 com- 
mands; S, L, V, and A that are used 
to SAVE, LOAD, VERIFY and 
APPEND at a high speed (3600 
baud). 

ARROW— leaves the usual 
messages that appear on the screen. 

ARROW— adds a message telling 
you the length of the program that has 
been loaded (or saved). 

ARROW— keeps all of the usual 
short hand features of program 
naming. 

ARROW— starts automatically when 
you turn on your VIC-20 or CBM-64. 



Programming Aids 

ARROW— Adds the following pro- 
gramming aids: AUTOLINE number- 
ing, RENUMBERING of lines, DELETE 
a line or group of lines, SEARCH with 
optional replace, MOVE a block of 
memory, COMPARE two blocks of 
memory, HEXADECIMAL/DECIMAL 
calculator converter, XIT two machine 
language monitor with; Display, Go, 
Register, Save, Load and Exit com- 
mands. 
Prices Available 

AR20 (VIC-20), AR64 (CBM-64)- 
$49.95; ARAS20 (VIC-20), ARAS64 
(CBM 64)— $89.95. Call your local 
dealer or contact Skyles Electric 
Works, 231 E South Whisman Road, 
Mountain View, CA 94041 (415) 

965-1 735. □ Circle No. 85 

Computer Cases 

All COMP-CASES by COMPUTER 
CASE COMPANY are constructed of 
the highest quality luggage material 
with hard sides, padded handles, 
brass hardware and key locks. Rub- 
ber pads provide furniture protection, 
and steel lugs on the bottom, protect 
the case when transporting. The out- 
side is covered in the highest quality 
scuff resistant textured vinyl in rich 
brown. The tops are easily removed so 
that the equipment can be operated 
without removal from the case. Provi- 
sions are made for cords to exit the 
case even when the top is on and lock- 
ed, to provide convenient security 
without the need to disconnect elec- 
trical cords and cables. Storage space 
is provided for manuals, cords, work- 
ing papers, and supplies within each 
case. 

COMP-CASES are available for a 
wide variety of computer equipment 
and peripherals. Additional cases are 
being developed as the need arises. 
Special requests wilt be appreciated. 

You can be confident that a COMP- 
CASE will meet your every require- 
ment for quality, protection, security, 
and portability in an attractive case you 
can be proud of— and we guarantee it. 

Computer Case Company, 5650 In- 
dian Mound Court, Columbus, OH 

43213, (614) 868-9464. □ Circle No. 86 




FIVE POWERFUL SOFTWARE 
DEVELOPMENT TOOLS 

Plus Zhe Exciting New Book 
INSIDE THE VIC 



THE BOOK 

A complete clear explanation of machine 
language, Assembly language,. VIC 20 archi- 
tecture, graphics, joystick and sound effect 
programming. Detailed step-by-step guide to the 
use of the development tools. How to combine 
BASIC and machine language, make auto-start 
cartridges, Interface with the Internal ROM- 
based programs of BASIC and the Kernel. 
Sample programs fully explained. 






THE TOOLS 

Assembler/Edltor/Loader/Decoder/Mom'tor 
Full-featured Assembler allows use of labels, 
comments and arithmetic expressions to create 
machine language programs. Create, save, 
modify Assembly language programs with the 
Editor. Load and link machine language modules 
with the Loader. Decode machine language back 
Into assembly language for study or Input to the 
Editor. Single-step program execution with the 
Monitor. Extended features combines Assembler/ 
Editor for maximum ease of use. 



ALL FOR $49.95 PLUS $2.00 POSTAGE AND HANDLING Standard version runs on 
any system with Datasette (5K and up) Add $5.00 for disk version, $5.00 for extended features 
(minimum 8K) Send check, M.O., VISA/MC ($2.00 S.C.) or specify C.O.D. (add $3.00) to: 







PSYCQH SOFTWRE INTERNATIONAL 
BUILDS ADULT SOFTWARE FOR THE 
CfltlODORE 64 .TEXAS INSTRUMENTS 
tm OTHER PERSONAL COMPUTERS. 
INDIVIDUAL ORDERS ARE ACCEPTED 
BY TELEPHONE USING YOUR VISA 
OR MASTER CARD OR SHIPPED COD. 

CALL (513) -474-2188 
YOU HAY ALSO ORDER USING THE 
COWENIENT FORM INCLUDED BELOW, 
distributor inquiries invited 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
3E X 

Xnaine X 

3E X 

^street X 

X X 

Xc i ty X 

X X 

Xstate zip X 

X X 

Xchg.card exp date X 

X X 

Xcard# X 

Xplease rush ne t ] copies of X 
Xthe PERSONALITY WtLYZER today X 



P.O. Box 207, Cannon Falls, MN 55009 
507-263-4821 

VIC-20 Is a registered TM of 

Commodore Business Machines lnc.Q| rC | e |\jq 



Personality 
Analyzer 




Analyze yourself, your spouse, your date, 
relatives, co-workers and friends. 

Find out who you will get along with, 
who will work well with you, who will 
be fun to be with. 

Measure compatibility, career potential, 
behavior tendencies, values, etc. 



:■•■: PSYCOM 

*\i SOFTWARE 
INTERNATIONAL 



■■■ 
«•■ ■•■•■ 

■■■ ■■■■■ 
■ ■■■ 



2118 Forest Lake Drive 
Cincinnati, Ohio 45244 USA 

$24.95 

2.50 disk (additional) 

Circle No 35 
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WORDPROCESSOR 
FOR THE COMMODORE 64 
ALSO CHECKS YOUR SPELLING! 



SCRIPT 64 



Suggested Retail: $139.95 



ii 



REALLY FOXY IS BEING LETTER PERFECT" 



Contact Your Nearest Commodore Dealer Today . . . 

You'll Be So Glad You Did! 



Distributed By: 

COMPUTER 





300 W. Marlton Pike 
Cherry Hill, New Jersey 08002 



MARKETING services inc. (609j 795 94so 



Commodore 64 is a trademark of Commodore Electronics Limited 
Script 64 is a trademark of Richvale Telecommunications 
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Commander Dealers 



Given here, in zip code order, is a partial list of the Charter Dealers who will be carrying the COMMANDER. 
We will provide updates for this list in following issues as a service to provide our readers with a local source 
at which they will find information, hardware, or software for their Commodore Computers. 



U.S.A. 
Puerto Rico 

The Micro Computer Store 
1408 Avenue Jesus T. Pmero 
Rio Piedras, PR 00921 
(809) 781-0350 
Manager-Owner: Julio C. Martinez 

Massachusetts 

Tycom Associates 
68 Velma Avenue 
Piitsfield. MA 01201 
Manager-Owner: Dave Tyburski 

Northshore News Co. 
150 Blossom Street 
Lynn, MA 01902 
(617) 592-1300 
Manager-Owner: Tom Mulken, Jr. 

Computech Ltd. 
214 Derby Street 
Salem, MA 01970 
(617) 741-1724 
Manager-Owner: Tim Bush 

Omicron Corporation 
1416 Providence Highway 
Norwood, MA 02062 
(617) 769-6867 
Manager-Owner: Steve Gavrilles 

Rhode Island 

International Computer Services 
165 Dyerville Avenue 
Johnston,.' R I 02919 
(401) 2731001 
Manager-Owner: Steve Lablanc 

New Hampshire 

New England Periodical Service 
6th South St. 
Milford, NH 03055 
Manager/Owner: Jim Nolen 

Compu-Craft, Inc. 
17 Dunbar Street 
Keene, NH 03431 
(603) 357-3901 

Manager Owner: Richard Bishop 

Echo Consulting Services 
PO Box 1199 
Conway, NH 03818 
(603) 447-5455 
Manager-Owner: George Epotien 

Maine 

Maine Micro Systems, Inc. 
55 Center Street 
Auburn, ME 04210 
(207) 786-0696 

Manager Nancy Lecompte 

Vermont 

Com pu team 

205 Dorset Street 

South Burlington, VT 05401 

(802) 862-2802 

Manager-Owner: Mark Robinson 

Market Place 
1 Main Street 
Winoski, VT 05404 
Manager-Owner: Bob Howe 




Connecticut 

Multi- Business Computers Inc. 
28 Marlborough Street 
Portland, CT 06480 
(203) 342-2747 
Manager-Owner; Bob Stasko 

New Jersey 

Micro Computer Services 
61 Mountain Blvd. 
Warren, NJ 07060 
(201) 561-3111 
Manager-Owner; Jerry Prevete 

Computer Workshop 
1200 Haddenfield Road 
Cherry Hill, NJ 07013 
(609) 665-4404 
Manager-Owner: Charles Kolbe 

Software Land 
99 Broadway 
Elmwood, NJ 07407 
Manager/Owner: La Lit Modi 

NUBS Computer Center Inc. 
6 Ames Avenue 
Rutherford, NJ 07070 
Manager-Owner: Robert Weigel 

Software City 

85 Godwin Avenue 

Midland Park, NJ 07432 

Manager-Owner: Arlene Destosito 

Computerability, Inc. 

441 Route 23 

Pomton Plains, NJ 07444 

(201) 835-0688 

Manager-Owner: Dennis Mull 

Wayne Computer Store 
1459 Route 23 
Wayne, NJ 07470 
(201)626-7318 
Manager-Owner: Rick Delti 

Software City 

147 Nonh Kinderkamack Road 

Montvale, NJ 07645 

(201)391-0931 

Manager-Owner: CM. Hatfield 

Software City 
161 Cedar Ln 
Teaneck, HJ 07666 
Manager/Owner: George Barnes 

Computer Workshop 
1 200 Haddenfield Road 
Cherry Hill, NJ 08034 
(609) 665-4404 
Manager-Owner: Chris Kolbe 

Software-n-Such 
Warren Plaza. Route 130 
East Windsor, NJ 08520 
(609) 443-8984 
Manager-Owner: Paul Hammer 

BB/The Computer Store 
216 Scotch Road 
Trenron, NJ 08628 
(609)8832050 
Manager-Owner: Barry Brown 



New York 

Computer Center 

31 East 31st 

New York, NY 10016 

(212) 889-8130 

Manager- Owner. Elliot Rabmowitz 

Leigh's Computer 
212 East 85th Street 
New York, NY 10028 
Manager-Owner: Leigh Goldstein 

Complek 

90 John Street 

New York, NY 10038 

(212)962-6131 

Manager-Owner; Frances Banks 

Computer Store and More 
90 John St. 
New York, NY 10038 
Manager/Owner Francis Banks 

Computer Emporium 
37 Nonh Street 
Middletown, NY 10940 
Manager-Owner: Kate Honders 

Compu-Tech 
511 Hempstead Avenue 
West Hempstead, NY 11552 
Manager-Owner: Jim Brewmgton 

Software Emporium 
151 Minola Avenue 
Rosyln Heights. NY 11577 
Manager-Owner: Sheldon Ostroy 

B.C. Communications, Inc 
World Wide Electronics Dist 
207 Depot Road 
Huntington Street, NY 11746 
(516) 549*8833 

Computer Headquarters 

1245 Middle Country Road 

Selden, NY 1 1 784 

(516) 698-9373 

Manager-Owner. James and 

_ , _ Kathy Lyons 

Ray s Supply 

190 Route 9 
Cohoes, NY 12047 
Manager-Owner: Bob Howe 

Upstate Computer Shop 
1823 Western Avenue 
Albany. NY 12203 
(518) 456-3019 
Manager-Owner: William J. Smith 

Ray's Supply 
350 Cornila Street 
Pittsburgh. NY 12901 
Manager-Owner: Bob Howe 

Ray's Software 
106 East Main Street 
Mallone. NY 12953 
Manager-Owner: Bob Howe 

Future Distribution 
Trimex Bldg.— Route 1 1 
Mooers, NY 12958 
(514) 861-2831 
Manager-Owner: Phillippe Faure 



Ray's Software 
412 Eas! Jenesee Street 
Fayetteville, NY 13066 
Manager-Owner: Bob Howe 

Durmac Cash Registers 

1628 Erie Blvd. East 

Syracuse. NY 13210 

(315) 472-4531 

Manager-Owner: William McCarthy 

Upstate Computer Shop 
99 Commercial Drive 
Whitesboro, NY 13492 
(315) 768 8151 
Manager-Owner: Tony Violante 

Personal Computers. 
3251 Bailey Avenue 
Buffalo, NY 14215 

(716) 832-8800 
Manager-Owner: Frank C Smeirciak 

Pennsylvania 

One Stop Computer Shop 
65 North 5tn Street 
Lemoyne, PA 17043 

(717) 761-6754 
Manager-Owner: Joanne Wright 



aaaaaaaasaaaas 




Micro Age Computer Store 
1352 Tilghrnan Street 
Allentown, PA 18102 
(215) 434-4301 
Manager-Owner: Ed Eichenwald 

Maryland 

Professions' Micro Service 
1 00 West 22nd Street 
Baltimore. MD 21218 
(301)366*010 
Manager-Owner: James A. Breen 

Tn-State Computers 

1504 South Salisbury Blvd. 

Salisbury. MD 21801 

(301) 742-2020 

Manage^Owner: Tom Weiland 

Virginia 

Virginia Micro Systems 
13646 Jeff Davis Highway 
Wooabridge, VA 22191 
(703) 491-6502 
Manager-Owner: Suart Mitchell 
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Dealers, continued 



Alabama 

Tricelin Corporation 
Route 1. Box 128 
Bankston AL 35542 
(205) 689-4999 

Tennessee 

American Computer Co. 
1004-fllh Avenue South 
Nashville, TN 37203 
Manager-Owner. Jane Maggard 

Metro Computer Ctr. 

416 West Main Street 

Chattanooga, TN 37402 

(615) 875-6676 

Manager-Owner; Wayne F Wilson 

Mississippi 

Sunrise Persons Supplies 
901 South John Street 

Corinth, MS 38334 
(601) 287-4721 
Manager-Owner: Felex Gathings 

Kentucky 

All Business Computers 
Suite C-2317 Versailles Road 
Lexington, KY 40504 
(606) 253-2545 
Manage'-Owner: Bud Walden 

Stonehenge Computer, Inc 
2026-29th Street 
Ashland, KY 41101 
(606) 359-0545 

Ohio 

Office Mart, Inc. 
1 151 East Main Street 
Lancaster, OH 43130 
(614) 687-1707 
Manager-Owner: Pat Blake 

Computers Plus of Ohio 
1346 West 4th Street 
Mansfield, OH 43351 
Manager-Owner- Tom Young 

Computers Plus of Ohio 
127 West Wiandot Avenue 
Upper Sandusky, OH 43351 
Manager-Owner- Roger Schoenberger 

U-Compute 
Parker Steele Bldg. 
429 Monroe 
Toledo, OH 43606 
Manager-Owner- Paul Dotdner 

The Computer Store of Toledo, Inc 

18 Hillwyck Drive 

Toledo, OH 43615 

(419) 535-1541 

Manager-Owner: Al and Jackie Miller 

Computer Connection 
2851 Broadway 
Lorain, OH 44055 
Manager-Owner: Terry Rieger 

Mentor TV Inc 
7516 Menior Avenue 
Mentor, OH 44060 
Manager-Owner. William Tomkins 

Computer Site 
14763 Pearl Road 
Strongsville, OH 44136 
Manager-Owner: Bill Sero 

Computer Corner Inc. 
5104 Mayfield Road 
Lyndhurst, OH 44124 
(216) 423-5010 
Manager-Owner: Ross Black 

Computer Showcase 

5855 Youngston-Warren Road SE 

Niles, OH 444-46 

(216) 652-2571 



Waltz Photo 
438 Sixth Street 
Canton, OH 44701 
(216) 455-9421 
Manager-Owner: Brad Zupp 

Central News Co. 
2115 George St. 
Sandusky, OH 44870 
Manager/Owner: Jim Justice 

Wards Computers, Inc. 
868 Ohio Pike 
Cincinnati, OH 45245 
(513) 752-2882 
Manager-Owner: Carl Ward 

Computer Plus of Ohio 
123 East Main Cross Street 
Findlay, OH 45840 
Manager-Owner: Mike Deitelbach 

Indiana 

Allan's Jewelry & Loan Co. 
130 East 10th Street 
Anderson, IN 46016 
(317) 642-7978 
Manager. Jerry Rubenstem 

McCarels Computers 
1204 Meridian Plaza 
Anderson, IN 46016 
(317) 643-2662 

AVC Corporation 
2702 Applegate 
Indianapolis, IN 46203 
Manager-Owner: Brent Enderle 

Impair 
342 Bosart 

Indianapolis, IN 46201 
(317) 353-9947 
Manager-Owner: Fred Imhausen 

A Computer Store 
2140 North Mithoefor Road 
Indianapolis, IN 46229 
(317) 898-033 V 
Manager-Owner: Skip Robbins 

Computer Plus 
1501 Joliet Street 
Dyer, IN 46311 

Manager-Owner: Nancy L. Gray and 
Ronald Piercy 

Computer People 
900 Highway 212 
Michigan City, IN 46360 
(219) 879-8557 
Manager-Owner. Harry Hopkins 

General Micro Computers 
52303 Emmons Road 
South Bend, IN 46637 
Manager-Owner: John Levy 

Computer Corner 
6722 East State Blvd. 
Fort Wayne, IN 46815 
(219) 749-8338 
Manager-Owner: Tom Kutina 

Custom Software 
3197 South 3rd Place 
Terre Haute, IN 47802 
(812) 234-3242 
Manager-Owner: Vicki McEntaffer 

North Carolina 

The Program Center 

3400A West Wendover Avenue 

Greensboro, NC 27407 

(919) 855-8667 

Manager-Owner: Rupert Fenequito 

Piedmont Microsystems Inc. 
Route 3, Box 150 H 
Frazier Professional Bldg. 
Newton, NC 28658 
(704) 465-3600 
Manager-Owner: Lome Michael 



Bob West Computers 
54 West Main Street 
Brevard, NC 28712 
(704)883-2595 
Manager-Owner: Sylvia West 

Georgia 

Cardinal Computers 
903 North Gleenwood 
Dalton, GA 30720 
(404) 226-0502 ■ 

Integrated Systems, Inc. 

3300 Buckeve Road NE, Suite 178 

Atlanta, GA 30341 

(404) 458-0713 

Florida 

COMPUTECH 
1415 Timberlane Road 
Tallahassee, FL 32312 
(904) 893-1743 
Manager-Owner. Dan Evans 

Random Access Computers 
296 Eglin Parkway 
Fort Walton Beach, FL 32548 
(904) 862-7763 
Manager-Owner- Joanne Dodd 

Florida Book Store 
1614 West University Avenue 
Gainesville, FL 32604 
(904) 376-6066 

Skippers Inc. 

217 SE 1st Avenue 

Ocala, FL 32671 

(904) 732-3221 

Manager-Owner: David Lee Skipper 

Osceola Computer 

1300 Dakota Avenue 

Street Cloud, FL 32769 

(305) 892-1501 

Manager-Owner: Raymond Barrieau 

Sigma Systems of Orlando 
590 North Semoran Blvd. 
Orlando, FL 32807 
(305) 273-2434 
Manager-Owner: Tom Clance 

Computer Specialties, Inc. 
701 East Lincoln Avenue 
PO Box 17" 18 
Melbourne, FL 32901 
(305) 725-6574 
Manager-Owner; Otis P. Lutz 

Software Centrum 
2305 Ponce De Leon Blvd 
Coral Gables, FL 33134 
Manager/Owner: Chris Perez 

Micro Byte, Inc 
13710 SW 56 Street 
Miami, FL 33175 
(305) 385-2108 

Manager-Owner: Ed Silverman and 
Lyman Conover 

Focus Scientific 
224 North Federal Highway 
Fort Lauderdale, FL 33301 
(305) 462-1010 
Manager-Owner: M. Reinhardt 

The Software Connection 

5460 North State Road 7. Suite 108 

Fort Lauderdale, FL 33319 

Business Machines 

2821 Pinewood Avenue 

West Palm Beach, FL 33407 

(305) 655-4730 

Manager-Owner; Robert Frazier, Jr. 

The Software and Computer Store 
1506 Gulf-to-Bay 
Clearwater, FL 33515 
(813) 442-8803 
Manager-Owner: Charles Kautz 



Michigan 

Micro Station Inc. 

24484 West 10 Mile Road 

Southfield, Ml 48034 

(313) 358-5820 

Manager-Owner. Jerry Goldberg 

Comm Data 
320 Summit 
Milford, Ml 48042 
(313) 685-0113 
Owner: Larry Jones 

Roseville Computer 
25929 Gratiot 
Roseville, Ml 48066 
(313) 772-0760 
Manager-Owner. Tom Potter 

Allen Park Computer Center 
7000 Roosevelt, Suite 109 
Allen Park, Ml 48101 
(313) 383-8254 
Manager-Owner: Sam Noble 

West Side Radio 
7521 Wyoming 
Dearborn, Ml 48125 

Ye Old Computer Shoppe 

518 W. Cross St. 

Ypsilanti, Ml 48197 

Manager/Owner: Dr Donald Buckeye 

Haney's Computer Center 
15270 Gratiot 
Detroit, Ml 48205 
(313) 839-1850 
Manager-Owner: Paul M. Paul 

Computer Mart 

915 South Dort Highway 

Flint, Ml 48503 

(313) 234-0161 

Manager-Owner: Pat McCollem 

The Computer Source 
3205 S. Cedar St. 
Lansing, Ml 48910 
Manager/Owner: Edson Borges 

The Computer Connection 
444 West Maumer Street 
Adrian, Ml 49221 
(517) 265-7872 
Manager-Owner; Ron Gamling 

Newman AA/ Communications, Inc 
400-32nd Street SE 
Grand Rapids, Ml 49508 
(616) 243-3300 
Manager: Nancy Isler 

Computers and More 

2915 Breton SE 

Grand Rapids, Ml 49508 . 

(616) 243-3520 

Manager-Owner: Bill Slaughter 

Computer Tutor 
502 East Front 
Traverse City, Ml 49684 
(616) 941-5320 
Manager-Owner: Caroline Garrick 



Iowa 

Micro Computer Applications 
111 East Church Street 
Marshalltown, lA 50158 
(515) 752-8845 
Manager-Owner: Harold Montover 

Gronert Computers, Ltd. 
4505 Forest Avenue 
Des Moines, IA 50311 
(515) 255-0618 
Manager-Owner; Frank Gronert 

Citizens Mutual Telephone 
114 W. Jefferson 
Bloomfield, IA 52537 
Manager/Owner:WT Wallace 
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Cosmos Computers 
1721 Grant Street 
Bettendorf. IA 52722 
(319) 355-2641 
Manager-Owner: Paul Rung 



Wisconsin 

Starting Computers 
4020 North 128th 
Brookfield, Wl 53005 

3S Computer Center, Inc. 
103 E. Silver Spring Dr. 
Milwaukee, Wl 53217 
Manager/Owner: Alex Levitsky 

Majic Business Systems 

3519 West Wanda Avenue 

Milwaukee, Wl 53221 

(414) 282-8072 

Manager-Owner: Dennis Woitekaiits 

Computerland of Madison 
6625 Odana Road 
Madison, Wl 53719 
(608) 833-8900 
Manager-Owner: James Sullivan 



Minnesota 

P.M. Business Services 
4400 Arden View Court 
Arden Hills, MN 55112 



South Dakota 

Computerland Rapid City 
738 Street John Street 
Rapid City, SD 57701 
(605) 348-5384 
Manager-Owner: John Mattson 



Cambridge Business Systems 
3345 N. Halsted 
Chicago, IL 60657 
Manager/Owner: Jeff Angsten 

& Ralph Samek 

Micro Computers Plus 
349 E. Main St. 
Galesburg, IL 61401 
Manager/Owner- Mike Henner 

Kappel's Computer Store 
125 East Main 
Belleville, IL 62220 
(618) 277-2354 
Manager-Owner: Tom Kappel 

Data Plus, Inc. 
1706 Broadway 
Qumcy. IL 62301 
(217) 222-65602 
Manager-Owner. James Moore 

Computer Tutor 
1410 S. MaCarthur 
Springfield, IL 62704 
Manager/Owner: Bill McDannell 

Missouri 

Micro Age Computer 
11413 Olive Blvd. 
St. Louis, MO 63141 
(314) 567-7644 
Manager-Owner: Norm Fishel 

Common Wealth Computers 
5214 Blue Ridge Blvd. 
Kansas City, MO 64133 
(816) 356-6502 
Manager-Owner: Dick York 

Sigma Plus Computers 
1804 Vandiver Drive 
Columbia, MO 65205 



Kansas 

Kansas Micro Computer 
1601 W. 23rd 
Lawrence. KS 66044 
Manager/Owner: John Ellena 

Palmer News, Inc. 
1050 Republican St. 
Topeka, KS 66601 
Manager/Owner. 

Computer Business Machines 
Officenter 357 South Lulu 
Wichita. KS 67211 
(316) 267-1150 
Manager-Owner. Mrs. R. Santoscoy 

Compusense 
1001 South Washington 
Wichita, KS 67211 
Manager-Owner- J. Kendnck 

Nebraska 

Hobby Town 

220 North 66th Street 

Lincoln, NE 68505 

Central Office Equipment 
2020 Central Avenue 
Kearney, NE 68847 
(308) 234-2515 
Manager-Owner. Byron Hansen 

Louisiana 

The Computer Center 
111 C Rena Drive 
Lafayette, LA 70503 
(318) 988-2478 
Manager-Owner: Robert Jones 

Computer S.O.S. 
4436 Youree Drive 
Shreveport, LA 71105 



Texas 

Casual Computers 

15340 Dallas Parkway Suite 2108 

Dallas. TX 74248 

Taylor Computer Systems 
949 Melbourne Road 
Hurst. TX 76503 
(817) 284-5251 
Manager-Owner. Mike Taylor 

Computer Home 
431 East Avenue C 
San Angelo, TX 76903 
(915) 653-7488 
Manager-Owner: Brent DeMoville 

Texas Technical Services 
3115 West Loop South. #26 
Houston, TX 77027 
(713) 965-9977 
Manager-Owner Phil Ray 

I.T.S. 

420 Plantation Drive 

Lake Jackson, TX 77566 

(713)297-9016 

Manager-Owner: I.K Kelly. Jr. 

The Computer Experience 

125 Southbridge 

San Antonio, TX 78217 

(512) 340-2901 

Manager-Owner: Carolyn Roberts 

Valley Computer Systems, Inc. 
1101 North Cage, Suite A1 
Pharr, TX 78577 

Software-N-Things 

2141 West Anderson Lane 

Austin, TX 78757 

(512) 451-4347 

Manager-Owner: John Krieg 



Illinois 

The Software Store, Inc. 
1767 Glenview Road 
Glenview, IL 60025 
(312)724-7730 

Manager-Owner: David Pokvitis and 
Jeff Rayer 

Digital World 

71 1 Army Trail Road 

Addison, IL 60101 

(312) 628-9222 

Manager-Owner: Sam Gunda 

The Computer Store 
11004 S. Cicero Ave. 
Oak Lawn, IL 60453 
Manager/Owner: Gerald Henery 

B-A Computer Systems 
2 North Batavia Avenue 
Batavia, IL 60510 
(312)879-2350 
Manager-Owner: Robert Appel 

Softwareland, Inc. 
420 West 75th Street 
Downers Grove. IL 60516 
(312) 852-6340 
Manager-Owner: Maureen Quinn 

Software Emporium Limited 
175 North Franklin St. 
Chicago, IL 60606 
Manager/Owner: Reggie Miller 

Rozel Industries, Inc 
7360 North Lincoln Avenue 
Lincolnwood, IL 60646 
(312) 675-8960 

Manager-Owner. Fred Whitlock and 
Becky Kowalsky 

Fisher Scientific 

4901 West Lemoyne Avenue 

Chicago. IL 60651 

(312) 378-7770 

Manager-Owner: A.C Heidrich 
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WALLBANGER - Blast your way through the dodge'm, blast" m, 
and attack modes. If you destroy the bouncing balls before they destroy 
you, the walls close in for the next round. WALLBANGER is written in 
machine language, has great sound, and encourages complex strategies. 

CAS8/5K/VIC 20 

ALL 40/80 COLUMN PETS fiCBMS (Includes Shipping/Handling) S 19.95 

[CALIF. PES. ADD 6% SALES TAX] 

CHICKEN CHASE - Help your hapless hen avoid hungry 
chicken hawks, sneaky coyotes, and fiendish zompys. If your chicken gets 
into trouble, "hyper-hen" to a new spot on the maze. If your chicken 
travels the entire maze, you advance to the next level where the action is 
faster and the predators more numerous. Hi-res graphics, great sounds, 
and machine language help make CHICKEN CHASE a hilarious fun-filled 
game for the whole family. 

C-64/CASS/5K/VIC 20 (Includes Shipping/Handling) S19.95 

(CALIF. RES. ADD 6% SALES TAX] 

ROADTOAD - Hop your toad across 5 lanes of traffic, avoid 
deadly snakes, and dodge the dreaded toad-eaters. Cross a raging river 
full of logs, turtles, alligators, and park your toad in the safety of a harbor. 
Each time you park 5 toads, you enter a tougher level where the action is 
faster and the toad-eaters are more numerous. ROADTOAD is written in 
machine language and uses high resolution graphics. The sound effects are 
excellent and you can use a joystick or the keyboard to control your toad. 

C-64/CASS/5K/VIC 20 (Includes Shipping/Handling) S 19.95 

{CALIF. RES. ADD 6% SALES TAX) 

Write For N,BBL D E n S "£8, INC. ^ ^ 
FREE P.O. BOX 2044 EREE 

Catalog ORCUTT, CA 93455 Catalog 
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Dealers, continued 



Professional Computer Associates 
5326 Cameron 
Austin, TX 78723 
(512) 459-1220 
Manager-Owner: Steve Derosa 

Computerland of Amarillo 

2300 Bell Street 

Amarillo, TX 79106 

(806) 353-7482 

Manager-Owner: Mark Trowbridge 

Colorado 

Whole Life Distributors 
965 Washington Street #6 
Denver. CO 80203 
(303) 861-2825 
Manager-Owner: Tom Tarbart 

Zero Page, Inc. 

2380 Naegele Road 

Colorado Springs, CO 80904 

(303) 633-0211 

Manager-Owner: David C. Cooper 

Idaho 

Electronic Specialties, Inc. 
841 1 Fairview Avenue 
Boise, ID 83704 
(208) 376-5040 
Manager-Owner: Terry Romero 

Utah 

Computer Plus 
1078 East Fort Union Blvd 
Midvale. UT 84047 
(801) 566-3902 

Manager-Owner: Steve Whitzelor and 
Allen Vincent 



The Hi-Fi Shop 

2236 Washington Blvd. 

Ogden. UT 84401 

(801) 621-5244 

Manager-Owner: Brent Richardson 

Central Utah Electronics Supply 

735 South Stale 

Provo, UT 84601 

(801) 373-7522 

Manager-Owner: George S Moore 

Arizona 

Computer Super Store 
4001 East Thomas Road 
Phoenix, AZ 85108 
Manager-Owner: Richard Sarhan 

Personal Computer Place 
1840 West Southern Avenue 
Mesa, AZ 85202 
(602) 833-8949 

Manager-Owner: Roger Smith 

Computer Depot 

1201 Iron Springs Road 

Prescott, A2 86301 

(602) 778-7473 

Manager-Owner. Bnce Eldridge 

New Mexico 

Computer Super Store 
1660 Eubank NE 
Albuquerque, NM 87112 
Manager-Owner: Richard Saham 

Nevada 

PCS Computer 
3900 West Charleston, Ste R 
Las Vegas, NV 89102 
(702) 870-4138 
Manager-Owner: Mickey Cole 



Harry's Business Machines, Inc. 
323 West Street 
Reno, NV 89501 
(702) 322-4559 
Manager-Owner: Gordon Foote 



California 

Opamp Tech Books 
1033 North Sycamore 
Los Angeles, CA 90038 
(213)464-4322 
Manager-Owner: Alicion 

Data Equipment Supply Corp. 

8315 Firestone Blvd. 

Downey, CA 90241 

(213) 923-9361 

Manager; Robert Johnson 

Computer Place 
23914 Crenshaw Blvd. 
Torrance, CA 90505 
(213)325-4754 
Manager-Owner; Wen T. Huang 

Fyrst Byte 

10053 Whittwood Drive 

Whittier. CA 90603 

(213) 947-9411 

Manager-Owner: Darrell Miller 

Game Room 
5675 Kanan Road 
Agoura, CA 91301 
(213) 707-0142 
Manager-Owner: Jean Collier 

General Computer Store 
22323 Sherman Way Unit #7 
Canoga Park, CA 91303 
(213)704-6600 
Manager-Owner: Anita Broadway 
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BUSINESS INVENTORY 
ORDER TRACKER 
MY PROFIT MARGIN 
BILLING SOLVER 
CASH FLOW MODEL 
THE CLIENT TICKLER 
INCOME &, EXPENSER 
BUSINESS 
APPOINTMENTS 




POWERBYTE SOFTWARE™ 

Presents 

APPLICATION SOFTWARE 
Business and Home 

for the 

* Commodore 64 
•Vic20andTRS80CC 

65 Applications Available including: 

THE EDITOR - Advanced Word Processor 

with Powerful Editing Features (64 & 8K Vic 20) 

THE ACCOUNTANT - General Ledger, Income 

Statement & Balance Sheet 

ACCOUNTS RECEIVABLE/PAYABLE- Create 

Journal for Current Accounts & Record of Paid Accts. 

$19.95 AT HOME INVENTORY 

$19.95 

$16.95 

$19.95 

$16.95 

$19.95 

$15.95 

$16.95 



CHECKBOOK BOOKY 
THE STOCK TICKER 
TAPE 

UTILITY BILL SAVER 
THE BAR CHART 
MOTHER'S RECIPES 
THE MAILMAN 
GRADE MY KIDS 



AND MANY, MANY MORE!! 



FOR CASSETTE OR DISC ($ 10.00 Extra - 64 & Vic 20) 

•FREE CATALOG 

WITH INTRODUCTORY SPECIALS 

POWERBYTE SOFTWARE 



2CHIPLEY RUN 

WEST BERLIN, NJ 08091 

(609) 346-3063 
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HW Electronics 
19511 Business Center Drive 
North Ridge. CA 91324 
(213) 886-9200 
Manager-Owner. Ronda 

Levity Distributers 

6857'/2 Ben Avenue 

North Hollywood, CA 91605 

(213) 982-2514 

Manager-Owner: Melinda Plesha 

Data Systems West 

421 West Las Tunas Drive 

San Gabriel, CA 91776 

(213) 289-3791 

Owner: Frank J. Mogavero 

Consumer Computers 
8314 Parkway Drive 
La Mesa. CA 92041 
(714) 465-8888 
Manager: Steve Scott 

Calco Digital Equpiment Inc. 

1919 Aple Street 

Oceanside, CA 92054 

(714) 433-4119 

Vice President. Ronald N. Paperno 

20-64 Software Center 
9829 Mira-Mesa Blvd. 
San Diego, CA 92131 
(619) 695-0214 
Manager-Owner: Larry Skaggs 

Computer Nook, Inc. 

965 South E St 

San Bernadino, CA 92408 

Manager/Owner; Frank Bayless 

James J. Schmidt 

Inland Electro Mart 
8624 California Avenue 
Riverside. CA 92504 
(714) 687-3776 
Manager-Owner: Jack 

PEC 

1440 South State College, Suite 6F 

Anaheim, CA 92806 

Quality Computer Center 
801 South Victoria Street. #104 
Ventura. CA 93003 
(805) 642-1979 
Manager-Owner: David Stewart 

Jay-Kern Electronics 
1135 Columbus 
Bakersfield, CA 93305 
871-5800 
Manager-Owner. Don Taylor 

Micro Pacific Computer Center 
5148 North Palm 
Fresno, CA 93704 
(209) 229-0101 
Manager-Owner: Mike Reinhold 

J. Snell & Co., Inc. 

657 Mission Street 

San Francisco, CA 94105 

(415)421-5898 

Manager-Owner: James Snell 

Staceys Bookstore 

219 University Avenue 
Palo Alto, CA 94301 

PC Computers 

10166 San Pablo Avenue 

El Cerrito, CA 94503 

(415) 527-6044 

Manager-Owner: Gary Guttebo 

Computer Ideas, Inc. 
1029 Tennessee Street 
Vallejo, CA 94590 
(707) 552-5076 
Manager-Owner: J. Gavin 

Fox Computer Co. 
2678 North Main Street 
Walnut Creek, CA 94596 
(415) 944-9277 
Manager-Owner: Stan Nielson 

KHnSHBEHS 
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Albany Typewriter & Computer 
923 San Pablo Avenue 
Albany, CA 94706 
(415) 526-1959 
Manager-Owner: Bill Tichy 

Idea Computers 
301 North Santa Cruz Avenue 
Los Gatos. CA 95030 
(408) 354-1210 
Manager-Owner. Tom Wolf 

The Computer Room 
230 Mt. Herman Road 
Scotts Valley, CA 95066 
(408) 438-5001 
Manager-Owner: Gary Guuebo 

The Computer Center Stores 
930 Town & Country Village 
San Jose. CA 95128 
(408) 246-5710 
Manager-Owner- R. Reid, 
J. Barlow and N Kinney 

Inland Electro Mart 
8624 California Drive 
Riverside. CA 95204 
(714) 687-3776 
Manager-Owner- Jack 

Educational Connection 
1 508 Coffee Road 
Modesto, CA 95355 
(209) 576-1611 

Software Plus 

6201 "C" Greenback Lane 

Citrus Heights, CA 95610 

(916) 726-4979 

Manager Owner: Carolyn Webster 

The Radio Place 
2964 Freeport Blvd 
Sacramento, CA 95818 
(916) 441-7388 
Manager-Owner: Gary Stilwell 

Integral Computer Solutions 
2947 Fulton Ave. 
Sacramento, CA 95821 
Manager/Owner: Mike Kouri 

Ray Morgan Co. 
554 Rio Lmdo Avenue 
Chico, CA 95926 
(916) 343-6065 
Manager- Dave Wegner 

Computer Place 
1698 Market Street 
Redding, CA 96001 
(916) 221-1312 
Manager-Owner John Fredricks 

Radio Mart 
1075 Cypress 
Redding, CA 96001 
(916) 241-3000 
Manager-Owner- John Cokeley 



Oregon 

SW Computers 
1125 NE 82nd 
Portland, OR 97220 
Manager-Owner: Jerry 

Edu-Tech 
1575 NW 9th 
Corvalhs, OR 97330 
(503) 758-5577 
Manager-Owner L. Clark and 
W. Brown 

Libra Book Inc. 
856 Olive Street 
Eugene, OR 97401 
Manager-Owner' Larry West 

M-S-G 

537 Willamette Court 
Eugene, OR 97401 
Manager/Owner: Bill Kennish 



Midland Cascade 
61 West 8ih Avenue 
Eugene, OR 97401 
Manager-Owner: Ron Isaacs 

Ace-Tec 

Highway 101 South Computer Center 

Bandon. OR 9741 1 

(503) 347-9322 

Manager-Owner. Ace Egnew 

John's Newsiand 
130 E. Main 
Medford, OR 97501 
Manager/Owner- John Wikoff 

Washington 

Compu-Play 

1320 South 324ih. Suite A-3 

Federal Way, WA 98003 

(206) 839-4453 

Owner: Kevin Mitchell 

Electronic Superman 
7040 South 180th Street 
Kent, WA 98032 
(206) 251-8484 
Manager-Owner Richard Thorp 

Data Borne Computers 
641 SW 152nd 
Seattle, WA 98166 
Manager-Owner: Richard Kantak 

Programs Plus 

16874 Southcenter Parkway 

Seattle, WA 98188 

(206) 575-1375 

Manager-Owner. Nick Smith 

Computer World 
909 SE Everett Mall Way 
Everett, WA 98204 
Manager/Owner: William Lauby 

Conti Electronics Ltd. 

c/o Afcon 

140- 14th 

Blaine. WA 98230 

Manager-Owner: G.W Harder 

Computer Corner 
1610 North Laventure 
Mi Vernon, WA 98273 
(206) 428-1840 
Manager-Owner: Kirk D. Shroyer 

Technique Data Systems Inc 
3306 Hwy 101 East 
Port Angeles, WA 98362 
Manager-Owner- Loren Larson 

Computer + 

2504 Jefferson Avenue 

Tacoma, WA 98402 

(206) 272-2329 

Manager-Owner David Dodd 

Computer Town 
1215 Center 
Tacoma, WA 98409 
(206) 272-2271 

Nibbles & Bytes 

4020 South Steel Street, Suite 105 

Tacoma WA 98409 

(206) 475-5938 

Manager-Owner: John Clark 

Reed Graphics Inc. 
964 East 99th Street 
Tacoma, WA 98445 
Manager-Owner: Don Reed 

The Electronics Shop 
131 North Decator 
Olympia, WA 98502 
(206) 357-6304 
Manager-Owner. Frank and 
Tim Lmaham 

Bits, Bytes and Nibbles. Inc. 
209 Nonhtown Shopping Center 
Spokane, WA 99207 
(509) 487-1601 
Manager-Owner: Richard Shulman 



Alpha Computer Center 
1341 D. George Washington Way 
Richland, WA 99352 
Manager-Owner: John Freer 

Alaska 

BG Systems Co. 

204 East International 

Anchorage, AK 99502 

(907) 276-2986 

Manager-Owner. Robert DeLoach 

Micro Age Computer Store 
2440 Seward Highway 
Anchorage. AK 99503 
(907) 279-6688 
Manager-Owner: Jay Wisthoff 



Canada 

British Columbia 

Book Shoppe 
33-lOth Avenue South 
Cranbrook, BC VlC 2M9 
(604) 426-3415 
Manager-Owner- Tommy Wheeler 

Dynamic Computer Systems Softcorner Developments 

6-1960 Springfield Road 683 East Broadway 

Kelowna, BC V1Y 5V7 Vancouver, BC VST 1X7 

(604) 860-7795 (604) 872-6601 

Manager-Owner: Wayne Henricksor Manager-Owner. Howard Schaefer 



Datum Electronics Ltd 
11-3000 Lougheed Highway 
Port Coquitlam, BC V3B 1C5 
(604) 464-4424 
Manager-Owner John Lim 

Minitronics Coquitlam Center 
1114-2929 Barnet Highway 
Coquitlam, BC V3B 3R5 
(604) 464-0633 
Manager-Owner: Ross Watson 

Village Computer Systems 
17704-56th Avenue, #8 
Surrey, BC V3S 1C7 
(604) 576-8112 
Manager-Owner: Ron Jasper 

Minitronics 
1440 Kmgsway 
Vancouver, BC V5N 2R5 
(604) 872-3225 
Manager-Owner. Bud Lam-Urn 

Castle Data Systems Ltd. 
670 East Broadway 
Vancouver, BC VST 1X6 
(604) 872-2829 ; 

Manager-Owner: Ken Poole 



Sight & Sound Computer Center 
657 Central 

Prince George. BC V2M 1C6 
(604) 562-0356 
Manager-Owner- Jim Condon 

Vulcan Computer Systems 
20571 Fraser Highway 
Langley, BC V3A 4G4 
(604) 530-8572 
Manager-Owner: Gord Tremain 



Conn Electronics 
7204 Main Street 
Vancouver, BC V5X 3J4 
(604) 324-0505 
Manager-Owner. Greg Harder 

621 Reading Center 
621 West Pender 
Vancouver. BC V6B 1W7 
(604)684-3814 
Manager-Owner: Wilson Yau 



C64-FORTH 

for the Commodore 64 

FORTH SOFTWARE FOR THE COMMODORE 64 
C64-FORTH (TM) for the Commodore 64 - $99.95 

• Fig Forth-79 implementation with extensions 

• Full feature screen editor and macro assembler 

• Trace feature for easy debugging 

• 320x200, 2 color bit mapped graphics 

• 16 color sprite and character graphics 

• Compatible with VIC peripherals including disks, data set modem, 
printer and cartridges 

• Extensive 144 page manual with examples and application screens 

• "SAVETURNKEY" normally allows application program distribution 
without licensing or royalties 

C64-XTEND (TM) FORTH Extension for C64-FORTH - $59.95 
(Requires original C64-FORTH copy) 

• Fully compatible floatingpoint package including arithmetic, 
relational logical and transcendental functions 

• Floating point range of lE+38 to 2E-39 

• String extensions including LEFTS, RIGHTS, and M1D$ 

• BCD functions for 10 digit numbers including multiply, divide, and 
percentage. BCD numbers may by used for DOLLAR. CENTS 
calculations without the round-off error inherent in BASIC real 
numbers. 

• Special words are provided for inputting and outputting 
DOLLAR.CENTS values 

• Detailed manual with examples and applications screens 

(Commodore 64 is a trademark of Commodore) 

TO ORDER - Specify disk or cassette version 

- Check, money order, bank card, COD's add $1.50 

- Add $4.00 postage and handling in USA and Canada 

- Mass. orders add 5% sales tax 

- Foreign orders add 20% shipping and handling 

- Dealer inquiries welcome 

PERFORMANCE MICRO PRODUCTS 



770 Dedham Street. S-2 

Canton, MA 02021 

(617)828-1209 
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Dealers, continued 



Conti Computer Systems 
1216 West Broadway 
Vancouver. BC V6H 1G3 
(604) 734-0606 
Manager-Owner- Duncan Fruscr 

Mall Book Bazaar 
850 Granville Street 
Vancouver, BC V6Z 1K3 
(604) 687-2213 
Manager-Owner Mike McCord 

Owens & Sons Cash Register 
2101 Government Street 
Victoria, BC V8T 4P2 
(604) 383-7134 

Manager-Owner. Robert Owen and 
Glen Gray 

Owens & Sons Cash Register 
245 Fraser Street 
Nanaimo. BC V9R 5C2 
(604) 753-4178 
Manager-Owner: Wayne Wngley 

Dy-u.m.c Computer Center 

3l05-3lst Avenue 

Vernon, BC 

(604) 860-7795 

Manager-Owner C- l, rs Chambers 

Mmitromcs Guildford Center 
Surrey, BC 
(604) 584-1033 



Quebec 

Sys'ems Ormtc Ltd 
909 DeBcurgo^e 
Ste-Fcy. Quebec G1W 4S6 
(418) 659-38^8 

Systems Ormtc Lid 
999 De Bouragog-ue 
Ste-Foy, Quebec G1VY 4S6 
Manager-Ow n er: Yvo f , abbee 

Systems Ormic Ltd 
133 Sie-Germam 
Rimouski, Quebec G5L 4B6 

Systems Oarvc Ltd. 
1500 Norte Darr.e 
Trois-Rivieres. Quebec G9A 4X5 

Caleq, Inc. 

331 Sir Wilfred La^er 

St. Lambert. Quebec J4R 2. 1 

(514) 465-6055 

Manager-Owner Ma r cel Bourcier 

Le Cameiot 

1 191 P:ace Phillips Square 

Montreal, Quebec H3B 3C9 

(514) 86 1 -50 19 

Manager-Owner: Francine Roseenmol 



Ontario 

Questar Hemational, \iK 
7270 Woodbine Avenue 
Markam, Ontar.o J3R 4B9 
(416) 475-8044 



Electronics 2001 
5529 Yonge Street 
Willowdate, Qn:arto M2N 5C3 
(416) 223-8400 

Lichiman's News Agency 
34 Adelaide St reel West 
"o'or }. Ontan- M5H 1 P6 

House of Compters 
368 Egiinton Avenue West 
Toronto Ontario M5N 1 A? 

(416) 482-4336 

Arkon Eleci'urucs 
409 Queer>s Street West 
Toronto Ontario M5V 2AS 
(416) 593-9653 
Manager-Owm-- Pau Po"-~ 

Compute' Ocwi Ltd 

733 R i en mono Si reel 

London. Ontario N6A 3H2 

(519) 672-9370 

Manager -Owner Wally So^oton 

Lictifriian s News Agency 
Bayview V.frage Shopping Mall 

Lichl man's News Agency 
1430 Yonge Skeei 
Toronto. Ontario 



Alberta 
Soft O pi i on 

Box 1 \2 S'ation T 
Cafgaiy. Alberta T2H 2G_7 
Meager- Owner David Evans 




SAVE MONEY ON YOUR VIC20 & C64 
ELIMINATE THE VIC/C64 RECORDER 

The VIK DUBBER is an 

interface which allows you 
to connect any standard cas- 
sette recorder to the VIC-20 
or C64. The VIK DUBBER 
contains circuitry which fil- 
ters and enhances the data 
coming in from the cassette, 
providing the most optimum 
load possible. The VIK DUB- 
BER also allows you to 
connect two cassette re- 
corders together to allow 
you to make backup cop- 
ies of any VIC-20 or C-64 program. No battery required. 
$34.95 postpaid. Add $2.50 for shipping outside the US, 
Canada, or Mexico. VISA or MASTERCARD welcome. 

FOR CHARGE OR COD. ORDERS 




1-800-227-3800 TOLL FREE 
1-800-792-0990 IN CALIFORNIA 
ASK FOR OPERATOR 225 



For check order, additional information or service, call or write: 

BYTESIZE MICRO TECHNOLOGY 

PO BOX 21123 - DEPT. A- SEATTLE, WA 98111 

(206) 236-BYTE 

DEALER INQUIRIES WANTED 
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Computer World 

4921 -49th Sfreel 

Red Deer. Aslama T4N 1V2 

(403) 34 7 4280 

Manager-Owner Dav-u "ede 

Kellev Software Disi Lid 
FU Box ^932 
Edmonton Afberia T5J 3L ' 
Manager-Owner Tom Kelly 

T J B Microsystems |. Id 
1099' -1 24 tn Sueet 
Edmonton Albert T5M QH9 
(403) 451 6262 

Manager-Owner Jo** v n Atwooo ana 
Doug Poon 

T.J.B Microsysie-Tis, Lid. 

10458-82-a Street 

Edmon;on, Aiberta 

(403) 433-3^6^ 

Manager Owner John At wood 

Eleciro-T's 
3770-1 70th Stree; 
Edmonton, Afoerra T5T 3J7 
(403) 487-0144 
Manager-Owner: Gerry Rush 

D.co Pes; #9 

103-9709 Frankhn Avenue 
Fori McMurray; A'bena 
(403) 79 --6664 
Manager Owner. Pal Erier 

Johnmes Appliances 

Box 1010 

Le Due. Albert T9E 2Y6 

(403) 986-2738 

Manager-Owner Ron and Le 

Chinook Electronics 
Box 585 

Leihbndae. AJbef-a 
(403) 320-1424 
Manager- Owner Wayne 
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User Clubs 



Massachusetts 

Masspet Commodore User Group 
P.O. Box 307 
East Taunton, MA 02718 
Contact— David A. Rogers 

New Hampshire 

TBH VIC-NIC CLUB 
PO Box 981 
Salem, NH 03079 
Contact— J. Newman 
Publication-VIC-NIC NEWS 
Interests— VIC-20 Exclusively 

New York 

National VIC Association 
9 Crabapple Lane 
Nanuet, NY 10954 
Contact— Michael Kleinert 
(914) 623-8929 

North Carolina 

Micro-Computer Users Club 
P.O. Box 17142 
Bethabara Station 
Winston-Salem, N.C. 27116 
Contact— Joel D. Brown 
Interests— VIC-20 & CBM 64 
Newsletter— The "VIC" Connection 

Kentucky 

The Commodore Connection 
1010 South Elm 
Henderson, KY 42420 
Contact— Jim Kemp 
(502) 827-8153 
Interests— VIC, CMB 64, PET 

Ohio 

Central Ohio PET User's Group 
107 South Westmoor Avenue 
Columbus, OH 43204 
Contact— Philip H. Lynch 
(614) 274-0304 
Interests— Support of all 
Commodore Products 
Commodore Youths of Ohio 
9729 Lawndell 
Navarre, Ohio 44662 
Contact— Todd Archinal 

(216) 767-3514 
Interests— All Commodore Users 
^under 20 years of age. 



SW Ohio VIC Users Club 
659 Carthage Avenue 
Cincinnati, OH 45215 
Contact— Tom E. Harris 
761-7510 

Public Doman Inc. 
5025 So. Rangeline Road 
West Milton, OH 
Contact— Bill Munch 

Indiana 

The VIC Indy Club 
PO Box 11543 
Indianapolis, IN 46201 
Contact— Linda Kropzer 
(317) 878-3342 

Michigan 

Michigan's Commodore-64 

Users Club 
14342 Stephens 
Warren, Ml 48089 
Contact— Doug Schwartz 
(313) 776-5835 or 
Chuck Ciesliga 
(313) 773-6302 
Newsletter— Sprite 64 

(published monthly) 
Interests— All uses of Commodore 

64 Computer 

South Dakota 

VIC-64 Users Club 
203 East Sioux Avenue 
Pierre, SD 57501 
Contact— Larry J. Lundeen 
(605) 224-4863 

Illinois 

The Fox Valley PET User's Club 

833 Willow Street 

Lake in the Hills, IL 60102 

Contact— Art Dekneef 

(312) 658-7321 

Chicagoland C-64 Users Club 
190 Oakwood Drive 
Woodale, IL 60191 
Contact— Russ Hurlbut 
(312) 860-2015 

Kansas 

Commodore Users Group of Wichita 
Route 1, Box 115 
Viola, Kansas 67149 



Texas 

Commodore (Houston) 

Users Group 
8738 Wildforest 
Houston, TX 77088 

California 

SFVCUG (San Fernando Valley 
Commodore Users Group) 

21208 Nashville 

Chatsworth, CA 91311 

Contact— Thomas Lynch (President) 
(213) 889-2211 X2015 Days 
(213) 709-4736 Nights 

Newsletter— Monthly 

Interests— All Commodore Products 

Commodore Interest Association 
c/o Computer Data 
14660 La Paz Drive 
Victorville, CA 92392 

Amateurs and Artesian 
PO Box 682 
Cobb, CA 95426 
Contact: B. Alexander KR6G 

Washington 

Cyborg Gazette 
30023-1 18th Ave. SE 
Auburn, Washington 98002 
Contact— Ben Dunnington 

(206) 939-0582 

(206) 924-6992 
Newsletter- 
Commodore 64 Magazine 

A.T.S. VIC-20 Computer Club 
7906 34th Avenue SW 
Seattle, WA 98126 
Contact— Ken Gazaway 
(206) 935-2697 
Publication— For VIC-20 only 

Central Washington Commodore 

User's CLub 
1222 South 1st Street 
Yakima, WA 98902 
Contact— Bob Wood or 

Tim McElroy 

Canada 

Winnipeg PET Users 

9-300 Ennis Killeo 

Winnipeg, Manitoba, Canada R2V0H9 

Contact: Larry Nevfeld ^ 
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Sorcerer's 



Apprentice 



Byftdam 
Bellin 




$49.95 

Plus $2.00 Shipping 

TOTAL GRAPHICS 



16 COLORS 

HIGH RESOLUTION 

AUTO FILLS 
MEMORY MOVE 
MICROVIEW 



AUTO LINES 

• RECTANGLES 

• TRIANGLES 

• CIRCLES 

• ELLIPSES 



EVENT HORIZON SOFTWARE 

P. 0, box 1327 New Yor k , N Y I0028 21 2 535 - 0697 
Dealer inquiries Invited 



1 









J 



Circle No 16 




SOFTWARE 





If you own a VIC 20 or 
Commodore '64 get 
ready to explore the 
potential of these fine 
machines with LUNA 
Software. The software 
supplier for the 80's. 

We have broken free of 
the pack with stunning 
games such as our 
sophisticated, three- 
screen, FINAL CON- 
QUEST, the newest entry 
to our '64 line. 



Experience heart-racing 
surges of adrenalin while 
trying to outrun lightning- 
footed coyotes on our 
HYPER-HEN grid. And, if 
you're the PEDESTRIAN, 
keep a sharp eye on the 
traffic behind you, and 
the muggers ahead. 

LUNA's full line of arcade 
style games and user- 
friendly business software 
makes us the industry's 
most sought after new 
supplier. 



LUNA Software: Commit- 
ted to providing you with 
State-of-the-Art concepts 
and programming to 
bring out the best possi- 
ble performance from 
your Commodore com- 
puters. Call LUNA today 
for the name of a dealer 
in your area. 



LUNA SOFTWARE, P. 0. Box 26922, San Jose, CA 95159-6922 (408) 378-7793 









$49.95 
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"NEVER 1 



FORGETS." 



MORE HUM JUST ANOTHER PRETTY MCE. 



Says who? Says ANSI. 

Specifically, subcommittee X3B8 of the American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed the specs 
required to meet or exceed all their standards. 

But just who is "subcommittee X3B8" to issue such 
pronouncements? 

They're a group of people representing a large, 
well-balanced cross section of disciplines— from 
academia, government agencies, and the computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com- 
puter Programmers and Analysts. In short, it's a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 



make life miserable for everyone in the disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under the full moon) to concoct more 
and more rules to increase the quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages— listing, and insisting upon— hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you'd like a copy of this formidable docu- 
ment, for free, just let us know and well send you 
one. Because once you know what it takes to make 
an Elephant for ANSI . . . 

We think you'll want us to make some Elephants 
for you. 



aEPHANT. HEAVY DOTY DISKS. 

For a free poster-size portrait of our powerful pachyderm, please write us. 

Distributed Exclusively by Leading Edge Products, lnc v 225 Turnpike Street, Canton, Massachusetts 02021 

Call: toll-free 1-800-343-6833; or in Massachusetts call collect (617) 828-8150. Telex 951-624. 



